summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/latex/base/ltdirchk.dtx
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2015-10-02 22:15:45 +0000
committerKarl Berry <karl@freefriends.org>2015-10-02 22:15:45 +0000
commitabbefcd9fbfcd8e487162ec28f349e3143914449 (patch)
tree289cbdb698c3dc477252484424234fa14da2b014 /Master/texmf-dist/source/latex/base/ltdirchk.dtx
parent8a03ef16f0821bc20895c680b246ead3eafa0d44 (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.dtx24
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