diff options
author | Manuel Pégourié-Gonnard <mpg@elzevir.fr> | 2011-05-21 16:40:45 +0200 |
---|---|---|
committer | Manuel Pégourié-Gonnard <mpg@elzevir.fr> | 2011-05-21 16:40:45 +0200 |
commit | 88043b9759cef08232e34964f488cac414c16067 (patch) | |
tree | 350843eae480c35f900e27349943f254324b9384 | |
parent | cbc564d6c73b4d6139419b7e1722deb633833a77 (diff) | |
download | luatexbase-88043b9759cef08232e34964f488cac414c16067.tar.gz |
make test-luatex5 pass
- fix \lltxb@synonym
- rename \setcatcoderange as \SetCatcodeRange
-rw-r--r-- | Makefile | 2 | ||||
-rw-r--r-- | luatex.dtx | 4 | ||||
-rw-r--r-- | luatexbase-cctb.dtx | 33 |
3 files changed, 31 insertions, 8 deletions
@@ -147,7 +147,7 @@ check-luatex: install-runfiles #$(TESTENV) lualatex --interaction=batchmode test-luatex2.tex >/dev/null #$(TESTENV) lualatex --interaction=batchmode test-luatex3.tex >/dev/null #$(TESTENV) lualatex --interaction=batchmode test-luatex4.tex >/dev/null - #$(TESTENV) luatex --interaction=batchmode test-luatex5.tex >/dev/null + $(TESTENV) luatex --interaction=batchmode test-luatex5.tex >/dev/null $(CTAN_ZIP): $(SOURCE) $(COMPILED) $(TDS_ZIP) @echo "Making $@ for CTAN upload." @@ -272,8 +272,8 @@ See source file '\inFileName' for licence and contact information. \else \def\x####1####2{% \begingroup \endlinechar10 - \message{Package ####1 warning: ####2}}% - \endgroup + \message{Package ####1 warning: ####2}% + \endgroup}% \fi \expandafter\endgroup \x{luatex}{\string#1 is deprecated^^J% diff --git a/luatexbase-cctb.dtx b/luatexbase-cctb.dtx index e2c701d..6f7525a 100644 --- a/luatexbase-cctb.dtx +++ b/luatexbase-cctb.dtx @@ -136,7 +136,7 @@ See source file '\inFileName' for details. % (once they are allocated), two helper macros are available. % % \begin{quote} -% \cs{setcatcoderange}\marg{from}\marg{to}\marg{value} +% \cs{SetCatcodeRange}\marg{from}\marg{to}\marg{value} % \end{quote} % Set all characters code in the range \meta{from}--\meta{to} to the given % catcode \meta{value}. @@ -456,7 +456,7 @@ See source file '\inFileName' for details. % Set the catcodes for a range of characters. % % \begin{macrocode} -\def\setcatcoderange#1#2#3{% +\def\SetCatcodeRange#1#2#3{% \edef\luaSCR@temp{% \noexpand\@tempcnta=\the\@tempcnta \noexpand\@tempcntb=\the\@tempcntb @@ -472,6 +472,29 @@ See source file '\inFileName' for details. \luaSCR@temp} % \end{macrocode} % +% Make \cs{SetCatcodeRange} available with its old name. +% +% \begin{macrocode} +\def\lltxb@synonym#1#2{% + \def#1{% + \begingroup + \ifdefined\PackageWarning + \let\x\PackageWarning + \else + \def\x####1####2{% + \begingroup \endlinechar10 + \message{Package ####1 warning: ####2}% + \endgroup} + \fi + \expandafter\endgroup + \x{luatex}{\string#1 is deprecated^^J% + and will be removed in the next version of the package.^^J% + Please use \string#2 instead.} + \let#1#2% + #1}} +\lltxb@synonym \setcatcoderange \SetCatcodeRange +% \end{macrocode} +% % Set a catcode table. % % \begin{macrocode} @@ -499,8 +522,8 @@ See source file '\inFileName' for details. \catcode0 12 % nul \catcode13 12 % carriage return \catcode37 12 % percent - \setcatcoderange{65}{90}{12}% A-Z - \setcatcoderange{97}{122}{12}% a-z + \SetCatcodeRange{65}{90}{12}% A-Z + \SetCatcodeRange{97}{122}{12}% a-z \catcode92 12 % backslash \catcode127 12 } % \end{macrocode} @@ -518,7 +541,7 @@ See source file '\inFileName' for details. \newluatexcatcodetable\CatcodeTableLaTeX \setluatexcatcodetable\CatcodeTableLaTeX{% \luatexcatcodetable\CatcodeTableIniTeX - \setcatcoderange{0}{31}{15}% + \SetCatcodeRange{0}{31}{15}% \catcode9 10 % tab \catcode12 13 % form feed \catcode13 5 % carriage return |