summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/gmutils/gmenvir.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/latex/gmutils/gmenvir.sty')
-rw-r--r--Master/texmf-dist/tex/latex/gmutils/gmenvir.sty44
1 files changed, 20 insertions, 24 deletions
diff --git a/Master/texmf-dist/tex/latex/gmutils/gmenvir.sty b/Master/texmf-dist/tex/latex/gmutils/gmenvir.sty
index 3348e8b0005..a5d1759ab40 100644
--- a/Master/texmf-dist/tex/latex/gmutils/gmenvir.sty
+++ b/Master/texmf-dist/tex/latex/gmutils/gmenvir.sty
@@ -2,7 +2,7 @@
%% \iffalse ^^A we skip the debug setting
\IfFileExists{\string~/bin/gen_and_xela}{\errorcontextlines=1000 }{}
%% \fi
-%% ^^A $Id: TheUltimateMaster.gmd,v 0.250 2010/10/24 14:42:35 natror Exp natror $
+%% ^^A $Id: TheUltimateMaster.gmd,v 0.297 2011/02/02 18:13:11 natror Exp natror $
%% This is file “gmenvir.sty” generated with the DocStrip utility.
%%
%%
@@ -93,26 +93,10 @@
\long\def\@fourthofmany#1#2#3#4#5\@nil{#4}%
\lpdef\@ifprevenvir#1{%\label{@ifenvir}\
- % \begin{enumargs}
- % \mand enquired environment name which will be confronted with
- % \incs{@prevenvir}
- % \mand what if true (if the names are
- % equivalent\qfootnote{The names are checked whether they produce
- % the same \cmd\csname. They don't have to have the same
- % catcodes.})
- % \mand what if false
- % \end{enumargs}
- %
- % \changes{v0.92}{2009/09/04}{added}
- % \chgs{2010/06/09 v0.993 made use \cmd\@envirstack}
- %
- % % \CH{2010/09/23 v0.993 to be precise, it's not a change but
- % % rather a staus quo action: \cmd\gmu@ifedetokens suddenly turned
- % % to be expandable and un\cmd\protected so we make \emph{this}
- % % macro \cmd\protected}
\gmu@ifedetokens
{\@xa\@fourthofmany\@envirstack\relax\relax\relax\relax\@nil}%
- {#1}}
+ {#1}%
+}
\def\@checkend#1{%
@@ -130,12 +114,24 @@
\pdef\@endifprev#1{\@ifprevenvir{#1}{\end{#1}}{}}
+\newcount\c@EnvirInterruption
+
+\lpdef\gmu@InterruptEnvir
+#1% the contents of interruption.
+{%
+ \global \advance\c@EnvirInterruption\@ne
+ \Name \@popenvir
+ {gmu@InterruptCurrenv \the\c@EnvirInterruption}\gmu@drain\gmu@drain
+ \endgroup
+ #1%
+ \begingroup
+ \@XA {\let\@currenvir}%
+ \csname gmu@InterruptCurrenv \the\c@EnvirInterruption \endcsname
+ \@pushenvir
+ \global \advance\c@EnvirInterruption\m@ne
+}
+
-%%% (For my GNU Emacs:)
-%%% Local Variables:
-%%% mode: doctex
-%%% coding: utf-8
-%%% End:
\endinput
%%
%% End of file `gmenvir.sty'.