Skip to content

Commit

Permalink
Remove an unneeded x-type expansion
Browse files Browse the repository at this point in the history
  • Loading branch information
josephwright committed Dec 1, 2019
1 parent c4091fc commit d2a2b05
Showing 1 changed file with 6 additions and 6 deletions.
12 changes: 6 additions & 6 deletions l3kernel/l3text.dtx
Expand Up @@ -1289,16 +1289,16 @@
{ \sys_if_engine_luatex_p: }
{ \sys_if_engine_xetex_p: }
{
\cs_new:cpx { @@_change_case_upper_de-alt:nnnN } #1#2#3#4
\cs_new:cpn { @@_change_case_upper_de-alt:nnnN } #1#2#3#4
{
\exp_not:N \int_compare:nNnTF { `#4 } = { "00DF }
\int_compare:nNnTF { `#4 } = { "00DF }
{
\exp_not:N \char_generate:nn { "1E9E }
{ \exp_not:N \char_value_catcode:n { `#4 } }
\exp_not:N \use:c { @@_change_case_char_next_ #2 :nn }
\char_generate:nn { "1E9E }
{ \char_value_catcode:n { `#4 } }
\use:c { @@_change_case_char_next_ #2 :nn }
{#2} {#3}
}
{ \exp_not:N \@@_change_case_char:nnnN {#1} {#2} {#3} #4 }
{ \@@_change_case_char:nnnN {#1} {#2} {#3} #4 }
}
}
% \end{macrocode}
Expand Down

0 comments on commit d2a2b05

Please sign in to comment.