diff options
author | Karl Berry <karl@freefriends.org> | 2015-10-02 22:15:45 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2015-10-02 22:15:45 +0000 |
commit | abbefcd9fbfcd8e487162ec28f349e3143914449 (patch) | |
tree | 289cbdb698c3dc477252484424234fa14da2b014 /Master/texmf-dist/source/latex/base/ltdirchk.dtx | |
parent | 8a03ef16f0821bc20895c680b246ead3eafa0d44 (diff) |
latex (2oct15)
git-svn-id: svn://tug.org/texlive/trunk@38531 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/source/latex/base/ltdirchk.dtx')
-rw-r--r-- | Master/texmf-dist/source/latex/base/ltdirchk.dtx | 24 |
1 files changed, 22 insertions, 2 deletions
diff --git a/Master/texmf-dist/source/latex/base/ltdirchk.dtx b/Master/texmf-dist/source/latex/base/ltdirchk.dtx index 96727458b88..a041fd18ae2 100644 --- a/Master/texmf-dist/source/latex/base/ltdirchk.dtx +++ b/Master/texmf-dist/source/latex/base/ltdirchk.dtx @@ -39,7 +39,7 @@ %<*driver> % \fi \ProvidesFile{ltdirchk.dtx} - [2015/01/03 v1.1 LaTeX Kernel (System Dependent Parts)] + [2015/10/02 v1.2a LaTeX Kernel (System Dependent Parts)] % \iffalse \documentclass{ltxdoc} \GetFileInfo{ltdirchk.dtx} @@ -82,7 +82,7 @@ % {documentation improvements mainly from internal/2520} % \changes{v1.0w}{1998/08/17}{(RmS) Documentation improvements.} % -% \CheckSum{618} +% \CheckSum{627} % % \section{\LaTeX\ System Dependent Initialisations} % @@ -226,6 +226,7 @@ % \end{macrocode} % \changes{v1.1}{2015/01/03}{Enable extra primitives when Lua\TeX{} is used} % \changes{v1.2}{2015/08/23}{Do not use luatex prefix} +% \changes{v1.2a}{2015/10/02}{Allow backing out of unprefixed names} % If Lua\TeX{} is in use the extensions and other new primitives % have to be activated: this is done as early as possible. Older % versions of Lua\TeX{} do not hide the primitives: a version check is @@ -262,6 +263,25 @@ %<latexrelease> "luatex", %<latexrelease> tex.extraprimitives("core","omega", "aleph", "luatex") %<latexrelease> ) +%<latexrelease> local i +%<latexrelease> local t = { } +%<latexrelease> for _,i in pairs(tex.extraprimitives("luatex")) do +%<latexrelease> if not string.match(i,"^U") then +%<latexrelease> if not string.match(i, "^luatex") then +%<latexrelease> table.insert(t,i) +%<latexrelease> end +%<latexrelease> else +%<latexrelease> if string.match(i,"^Uchar$") then +%<latexrelease> table.insert(t,i) +%<latexrelease> end +%<latexrelease> end +%<latexrelease> end +%<latexrelease> for _,i in pairs(t) do +%<latexrelease> tex.print( +%<latexrelease> "\noexpand\\let\noexpand\\" .. i +%<latexrelease> .. "\noexpand\\undefined" +%<latexrelease> ) +%<latexrelease> end %<latexrelease>} %<latexrelease>\EndIncludeInRelease %<latexrelease>\fi |