Skip to content

Commit

Permalink
[fix] newline char after \endmplibcode
Browse files Browse the repository at this point in the history
  • Loading branch information
dohyunkim committed Feb 24, 2014
1 parent 97025d1 commit 804de35
Showing 1 changed file with 4 additions and 2 deletions.
6 changes: 4 additions & 2 deletions luamplib.dtx
Original file line number Diff line number Diff line change
Expand Up @@ -1376,7 +1376,8 @@ luamplib.colorconverter = colorconverter
% \begin{macrocode}
\def\mplibputtextbox#1{\vbox to 0pt{\vss\hbox to 0pt{\raise\dp#1\copy#1\hss}}}
\newcount\mplibstartlineno
\def\mplibreplacenewlinebr{\begingroup\catcode`\%=12 \mplibdoreplacenewlinebr}
\def\mplibreplacenewlinebr{\begingroup
\catcode`\{=12 \catcode`\}=12 \catcode`\%=12 \mplibdoreplacenewlinebr}
\begingroup\lccode`\~=`\^^M \lowercase{%
\gdef\mplibdoreplacenewlinebr#1^^J{\endgroup\luatexscantextokens{{}#1~}}}
\endgroup
Expand All @@ -1387,7 +1388,8 @@ luamplib.colorconverter = colorconverter
% \begin{macrocode}
\bgroup\expandafter\expandafter\expandafter\egroup
\expandafter\ifx\csname ProvidesPackage\endcsname\relax
\def\mplibreplacenewlinecs{\begingroup\catcode`\%=12 \mplibdoreplacenewlinecs}
\def\mplibreplacenewlinecs{\begingroup
\catcode`\{=12 \catcode`\}=12 \catcode`\%=12 \mplibdoreplacenewlinecs}
\begingroup\lccode`\~=`\^^M \lowercase{%
\gdef\mplibdoreplacenewlinecs#1^^J{\endgroup\luatexscantextokens{\relax#1~}}}
\endgroup
Expand Down

0 comments on commit 804de35

Please sign in to comment.