summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/latex/l3kernel/l3token.dtx
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2022-04-29 21:14:21 +0000
committerKarl Berry <karl@freefriends.org>2022-04-29 21:14:21 +0000
commitb2a5f8bdbb658a1384f9f44896b2174e8d8b4bfb (patch)
tree2ae498e97b79e43e9c7c049a1df29f63353563ff /Master/texmf-dist/source/latex/l3kernel/l3token.dtx
parent197546e62573e3341307d61e8594a3274ad55722 (diff)
l3kernel (29apr22)
git-svn-id: svn://tug.org/texlive/trunk@63177 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/source/latex/l3kernel/l3token.dtx')
-rw-r--r--Master/texmf-dist/source/latex/l3kernel/l3token.dtx12
1 files changed, 10 insertions, 2 deletions
diff --git a/Master/texmf-dist/source/latex/l3kernel/l3token.dtx b/Master/texmf-dist/source/latex/l3kernel/l3token.dtx
index 6b1b1759ffd..0fb548d4831 100644
--- a/Master/texmf-dist/source/latex/l3kernel/l3token.dtx
+++ b/Master/texmf-dist/source/latex/l3kernel/l3token.dtx
@@ -43,7 +43,7 @@
% }^^A
% }
%
-% \date{Released 2022-04-20}
+% \date{Released 2022-04-29}
%
% \maketitle
%
@@ -1975,7 +1975,15 @@
{ \cs_if_exist_p:N \tex_XeTeXversion:D }
{
\cs_set:Npn \@@_str_change_case:nN #1#2
- { \tl_to_str:n {#2} }
+ {
+ \int_compare:nNnTF {#1} = 0
+ { \tl_to_str:n {#2} }
+ {
+ \int_compare:nTF { `A <= #1 <= `z }
+ { \char_generate:nn {#1} { 12 } }
+ { \tl_to_str:n {#2} }
+ }
+ }
}
% \end{macrocode}
% \end{macro}