[latex3-commits] [git/LaTeX3-latex3-latex3] l3text: Missed to more 'store' locations (6a734bc0d)

[Joseph Wright]

Repository : https://github.com/latex3/latex3
On branch  : l3text
Link       : https://github.com/latex3/latex3/commit/6a734bc0de679e1740b210d7dc2fc70258343da7

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

commit 6a734bc0de679e1740b210d7dc2fc70258343da7
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Sat Dec 7 09:58:14 2019 +0000

    Missed to more 'store' locations


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

6a734bc0de679e1740b210d7dc2fc70258343da7
 l3kernel/l3text.dtx | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/l3kernel/l3text.dtx b/l3kernel/l3text.dtx
index d4698e635..f33875b07 100644
--- a/l3kernel/l3text.dtx
+++ b/l3kernel/l3text.dtx
@@ -1523,7 +1523,7 @@
       { \@@_change_case_upper_el_aux:nnnN {#2} {#3} {#4} #1 }
     \cs_new:Npn \@@_change_case_upper_el_aux:nnnN #1#2#3#4
       {
-        \use:c { char_ #1 case:N } #4
+        \@@_change_case_store:e { \use:c { char_ #1 case:N } #4 }
         \@@_change_case_upper_el_loop:nnw {#2} {#3}
       }
     \cs_new:Npn \@@_change_case_upper_el_loop:nnw
@@ -1950,8 +1950,11 @@
           { \sys_if_engine_luatex_p: }
           { \sys_if_engine_xetex_p: }
           {
-            \exp_not:N \char_generate:nn { "0130 }
-              { \exp_not:N \@@_char_catcode:N #4 }
+            \exp_not:N \@@_change_case_store:e
+              {
+                \exp_not:N \char_generate:nn { "0130 }
+                  { \exp_not:N \@@_char_catcode:N #4 }
+              }
           }
           {
             \exp_not:N \@@_change_case_store:V