diff options
author | Karl Berry <karl@freefriends.org> | 2011-10-14 23:19:42 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2011-10-14 23:19:42 +0000 |
commit | 156a2b3e555456a90baac12411ebd5fcc7b9ef02 (patch) | |
tree | 3cf17f72769c1e200486df29e8d3b593feee7637 /Master/texmf-dist/tex/latex/gmutils/gmenvir.sty | |
parent | 000e5fcea9de9a48217705874f01a84133ddb70d (diff) |
gmutils (14oct11)
git-svn-id: svn://tug.org/texlive/trunk@24287 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/gmutils/gmenvir.sty')
-rw-r--r-- | Master/texmf-dist/tex/latex/gmutils/gmenvir.sty | 30 |
1 files changed, 18 insertions, 12 deletions
diff --git a/Master/texmf-dist/tex/latex/gmutils/gmenvir.sty b/Master/texmf-dist/tex/latex/gmutils/gmenvir.sty index a5d1759ab40..347198ceacf 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.297 2011/02/02 18:13:11 natror Exp natror $ +%% ^^A $Id: TheUltimateMaster.gmd,v 0.352 2011/10/12 15:19:42 natror Exp natror $ %% This is file “gmenvir.sty” generated with the DocStrip utility. %% %% @@ -13,7 +13,7 @@ %% %% Copyright © %% by Grzegorz ‘Natror’ Murzynowski -%% natror (at) o2 (dot) pl +%% natror (at) gmail (dot) com %% %% This program is subject to the LaTeX Project Public License. %% See http://www.ctan.org/tex-archive/help/Catalogue/licenses.lppl.html @@ -23,13 +23,13 @@ %% %% %% -%% For the documentation please refer to the file(s) +%% For documentation please refer to the file(s) %% gmutils.{gmd,pdf}. %% %% \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{gmenvir} - [2010/10/24 v0.993 redefinition of \string \begin \space and \string \end (GM)] + [2011/10/12 v0.996 redefinition of \string \begin \space and \string \end (GM)] %% @@ -52,14 +52,14 @@ }% } -\def\@popenvir#1#2#3{% - \@XA{\@popenvir@#1#2#3}\@envirstack\@nil +\def\@popenvir #1#2#3{% + \@XA{\@popenvir@ #1#2#3}\@envirstack\@nil } -\def\@popenvir@#1#2#3#4#5#6#7\@nil{% - \gdef#1{#4}% |#1| carries last envir name - \gdef#2{#5}% |#2| carries last envir level - \gdef#3{#6}% |#3| carries last envir beginnig line +\def\@popenvir@ #1#2#3#4#5#6#7\@nil{% + \gdef #1{#4}% |#1| carries last envir name + \gdef #2{#5}% |#2| carries last envir level + \gdef #3{#6}% |#3| carries last envir beginnig line \gdef\@envirstack{#7}% and we update the stack } @@ -107,8 +107,14 @@ \ampulexdef\end[#1][#1]\endcsname\@checkend{% \endcsname -\@popenvir\gmu@drain\gmu@drain\gmu@drain -\@checkend} +\@xa\gmu@ifempty\@xa{\@envirstack}% +{% + \PackageError {gmutils/base}% + {There's no environment to pop!}{Oy vey, gefeelte fish!}% +}% +{\@popenvir\gmu@drain\gmu@drain\gmu@drain }% +\@checkend +} \pdef\@endif#1{\@ifenvir{#1}{\end{#1}}{}} |