summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/luatex/luamplib/luamplib.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/luatex/luamplib/luamplib.sty')
-rw-r--r--Master/texmf-dist/tex/luatex/luamplib/luamplib.sty32
1 files changed, 8 insertions, 24 deletions
diff --git a/Master/texmf-dist/tex/luatex/luamplib/luamplib.sty b/Master/texmf-dist/tex/luatex/luamplib/luamplib.sty
index 242280e05fd..ea377e7e895 100644
--- a/Master/texmf-dist/tex/luatex/luamplib/luamplib.sty
+++ b/Master/texmf-dist/tex/luatex/luamplib/luamplib.sty
@@ -14,7 +14,7 @@
\else
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{luamplib}
- [2013/09/24 v2.01 mplib package for LuaTeX]
+ [2013/12/11 v2.03 mplib package for LuaTeX]
\RequirePackage{luatexbase-modutils}
\RequirePackage{pdftexcmds}
\fi
@@ -40,7 +40,7 @@
%catcode`\%=12 %% don^^e2^^80^^99t in Plain!
\catcode`\&=12 \catcode`\$=12
}
-\def\mplibputtextbox#1{\vbox to 0pt{\vss\hbox to 0pt{\raise\dp#1\box#1\hss}}}
+\def\mplibputtextbox#1{\vbox to 0pt{\vss\hbox to 0pt{\raise\dp#1\copy#1\hss}}}
\bgroup\expandafter\expandafter\expandafter\egroup
\expandafter\ifx\csname ProvidesPackage\endcsname\relax
\def\mplibcode{%
@@ -51,30 +51,13 @@
\long\def\mplibdocode#1\endmplibcode{%
\egroup
\directlua{
- luamplib.settexboxes([===[\unexpanded{#1}]===])
+ luamplib.tempdata = luamplib.makeTEXboxes([===[\unexpanded{#1}]===])
}%
\directlua{
- local data = luamplib.gettexboxes([===[\unexpanded{#1}]===])
- luamplib.process(data)
+ luamplib.processwithTEXboxes(luamplib.tempdata)
}%
}
\else
-\begingroup
-\catcode`\,=13
-\catcode`\-=13
-\catcode`\<=13
-\catcode`\>=13
-\catcode`\^^I=13
-\catcode`\`=13 % must be last...
-\gdef\FV@hack{%
- \def,{\string,}%
- \def-{\string-}%
- \def<{\string<}%
- \def>{\string>}%
- \def`{\string`}%
- \def^^I{\string^^I}%
-}
-\endgroup
\newenvironment{mplibcode}{\toks@{}\ltxdomplibcode}{}
\def\ltxdomplibcode{%
\bgroup
@@ -87,10 +70,11 @@
}%
\def\ltxdomplibcodefinally#1{%
\ifnum\pdf@strcmp{#1}{mplibcode}=\z@
- \directlua{luamplib.settexboxes([===[\the\toks@]===])}%
\directlua{
- local data = luamplib.gettexboxes([===[\the\toks@]===])
- luamplib.process(data)
+ luamplib.tempdata = luamplib.makeTEXboxes([===[\the\toks@]===])
+ }%
+ \directlua{
+ luamplib.processwithTEXboxes(luamplib.tempdata)
}%
\end{mplibcode}%
\else