From 59222c9505c42ce998b7dbef0b08077a2b0adc3c Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sat, 12 Jul 2014 22:23:04 +0000 Subject: lisp-on-tex (12jul14) git-svn-id: svn://tug.org/texlive/trunk@34578 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/lisp-on-tex/lisp-read.sty | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'Master/texmf-dist/tex/latex/lisp-on-tex/lisp-read.sty') diff --git a/Master/texmf-dist/tex/latex/lisp-on-tex/lisp-read.sty b/Master/texmf-dist/tex/latex/lisp-on-tex/lisp-read.sty index e93e752521f..5a6f66cf00b 100644 --- a/Master/texmf-dist/tex/latex/lisp-on-tex/lisp-read.sty +++ b/Master/texmf-dist/tex/latex/lisp-on-tex/lisp-read.sty @@ -21,7 +21,8 @@ \def\@@next{\@lispread@cell#1}% \else\ifcat\noexpand#2\relax% [Branch 2] A control sequence or a control symbol \ifx#2\@end@lispread % [Branch 2-1] EOI - \def\@@next{\endgroup#1\@tlabel@exception{!Found End of Input!}}% + \def\@@next{\endgroup#1% + \@tlabel@exception{{-1}{\@tlabel@string{!Found End of Input!}}}}% \else \def\@@next{\@lispread@symbol#1#2}% [Branch 2-2] Symbol \fi -- cgit v1.2.3