diff options
Diffstat (limited to 'Master/texmf-dist/source/latex/l3kernel/l3text-case.dtx')
-rw-r--r-- | Master/texmf-dist/source/latex/l3kernel/l3text-case.dtx | 51 |
1 files changed, 27 insertions, 24 deletions
diff --git a/Master/texmf-dist/source/latex/l3kernel/l3text-case.dtx b/Master/texmf-dist/source/latex/l3kernel/l3text-case.dtx index d93fad46242..b6c263c22d8 100644 --- a/Master/texmf-dist/source/latex/l3kernel/l3text-case.dtx +++ b/Master/texmf-dist/source/latex/l3kernel/l3text-case.dtx @@ -43,7 +43,7 @@ % }^^A % } % -% \date{Released 2022-02-05} +% \date{Released 2022-02-21} % % \maketitle % @@ -2082,37 +2082,40 @@ % we check at the end of the preamble. This will therefore only apply % to \LaTeXe{} package mode. % \begin{macrocode} -\cs_if_exist:cT { @uclclist } +\tl_if_exist:NT \@expl@finalise@setup@@@@ { - \AtBeginDocument + \tl_gput_right:Nn \@expl@finalise@setup@@@@ { - \group_begin: - \cs_set_protected:Npn \@@_change_case_setup:Nn #1#2 - { - \quark_if_recursion_tail_stop:N #1 - \tl_if_single_token:nT {#2} + \AtBeginDocument + { + \group_begin: + \cs_set_protected:Npn \@@_change_case_setup:Nn #1#2 { - \cs_if_exist:cF - { c_@@_uppercase_ \token_to_str:N #1 _tl } + \quark_if_recursion_tail_stop:N #1 + \tl_if_single_token:nT {#2} { - \tl_const:cn + \cs_if_exist:cF { c_@@_uppercase_ \token_to_str:N #1 _tl } - { #2 } - } - \cs_if_exist:cF - { c_@@_lowercase_ \token_to_str:N #2 _tl } - { - \tl_const:cn + { + \tl_const:cn + { c_@@_uppercase_ \token_to_str:N #1 _tl } + { #2 } + } + \cs_if_exist:cF { c_@@_lowercase_ \token_to_str:N #2 _tl } - { #1 } + { + \tl_const:cn + { c_@@_lowercase_ \token_to_str:N #2 _tl } + { #1 } + } } + \@@_change_case_setup:Nn } - \@@_change_case_setup:Nn - } - \exp_after:wN \@@_change_case_setup:Nn \@uclclist - \q_recursion_tail ? - \q_recursion_stop - \group_end: + \exp_after:wN \@@_change_case_setup:Nn \@uclclist + \q_recursion_tail ? + \q_recursion_stop + \group_end: + } } } % \end{macrocode} |