[latex3-commits] [git/LaTeX3-latex3-latex3] main: Add case exception ofr U+01F0 uppercasing with 8bit engines (afef71574)

[Joseph Wright]

Repository : https://github.com/latex3/latex3
On branch  : main
Link       : https://github.com/latex3/latex3/commit/afef71574004b0f5681612db3a74f005dbca7294

>---------------------------------------------------------------

commit afef71574004b0f5681612db3a74f005dbca7294
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Tue Apr 18 16:28:37 2023 +0100

    Add case exception ofr U+01F0 uppercasing with 8bit engines
    
    For latex3/latex2e#1033


>---------------------------------------------------------------

afef71574004b0f5681612db3a74f005dbca7294
 l3kernel/l3text-case.dtx | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/l3kernel/l3text-case.dtx b/l3kernel/l3text-case.dtx
index e50002bd5..0da6d4baa 100644
--- a/l3kernel/l3text-case.dtx
+++ b/l3kernel/l3text-case.dtx
@@ -2141,6 +2141,17 @@
   }
 %    \end{macrocode}
 %
+% A few adjustments to case mapping for combining chars: these are not needed
+% for the Unicode engines
+%    \begin{macrocode}
+\bool_lazy_or:nnF
+ { \sys_if_engine_luatex_p: }
+ { \sys_if_engine_xetex_p: }
+ {
+   \text_declare_uppercase_mapping:nn { "01F0 } { \v { J } }
+ }
+%    \end{macrocode}
+%
 %    \begin{macrocode}
 %</package>
 %    \end{macrocode}