summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/l3kernel/l3luatex.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'macros/latex/contrib/l3kernel/l3luatex.dtx')
-rw-r--r--macros/latex/contrib/l3kernel/l3luatex.dtx15
1 files changed, 6 insertions, 9 deletions
diff --git a/macros/latex/contrib/l3kernel/l3luatex.dtx b/macros/latex/contrib/l3kernel/l3luatex.dtx
index cbc3d7a4e2..7a59765ed5 100644
--- a/macros/latex/contrib/l3kernel/l3luatex.dtx
+++ b/macros/latex/contrib/l3kernel/l3luatex.dtx
@@ -43,7 +43,7 @@
% }^^A
% }
%
-% \date{Released 2019-10-02}
+% \date{Released 2019-10-11}
%
% \maketitle
%
@@ -328,6 +328,7 @@ local os_clock = os.clock
local os_date = os.date
local setcatcode = tex.setcatcode
local sprint = tex.sprint
+local cprint = tex.cprint
local write = tex.write
% \end{macrocode}
%
@@ -354,15 +355,11 @@ end
% \end{macro}
%
% \begin{macro}{l3kernel.charcat}
-% Creating arbitrary chars needs a category code table. As set up here,
-% one may have been assigned earlier (see \pkg{l3bootstrap}) or a hard-coded
-% one is used. The latter is intended for format mode and should be adjusted
-% to match an eventual allocator.
+% Creating arbitrary chars using |tex.cprint|.
% \begin{macrocode}
-local charcat_table = l3kernel.charcat_table or 1
-local function charcat(charcode, catcode)
- setcatcode(charcat_table, charcode, catcode)
- sprint(charcat_table, utf8_char(charcode))
+local charcat
+function charcat(charcode, catcode)
+ cprint(catcode, utf8_char(charcode))
end
l3kernel.charcat = charcat
% \end{macrocode}