l3kernel (6apr20)

git-svn-id: svn://tug.org/texlive/trunk@54672 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 19 insertions, 11 deletions

diff --git a/Master/texmf-dist/tex/latex/l3kernel/expl3-code.tex b/Master/texmf-dist/tex/latex/l3kernel/expl3-code.tex
index 10dd174a8f9..fca41998529 100644
--- a/Master/texmf-dist/tex/latex/l3kernel/expl3-code.tex
+++ b/Master/texmf-dist/tex/latex/l3kernel/expl3-code.tex
@@ -68,7 +68,7 @@
 %% and all files in that bundle must be distributed together.
 %% 
 %% File: expl3.dtx
-\def\ExplFileDate{2020-03-06}%
+\def\ExplFileDate{2020-04-06}%
 \begingroup
   \def\next{\endgroup}%
   \expandafter\ifx\csname PackageError\endcsname\relax
@@ -5925,9 +5925,11 @@
           }
           {
             \group_begin:
-              \cs_set_eq:NN \__seq_item:n \__seq_shuffle_item:n
               \int_zero:N \l__seq_internal_a_int
+              \__seq_push_item_def:
+              \cs_gset_eq:NN \__seq_item:n \__seq_shuffle_item:n
               #2
+              \__seq_pop_item_def:
               \seq_gset_from_inline_x:Nnn \g__seq_internal_seq
                 { \int_step_function:nN { \l__seq_internal_a_int } }
                 { \tex_the:D \tex_toks:D ##1 }
@@ -28235,6 +28237,8 @@
   }
 \cs_generate_variant:Nn \text_declare_expand_equivalent:Nn { c }
 %% File: l3text-case.dtx
+\bool_new:N \l_text_titlecase_check_letter_bool
+\bool_set_true:N \l_text_titlecase_check_letter_bool
 \cs_new:Npn \text_lowercase:n #1
   { \__text_change_case:nnn { lower } { } {#1} }
 \cs_new:Npn \text_uppercase:n #1
@@ -28523,17 +28527,21 @@
   }
 \cs_new:Npx \__text_change_case_char_title:nnN #1#2#3
   {
-    \bool_lazy_or:nnTF
-      { \sys_if_engine_luatex_p: }
-      { \sys_if_engine_xetex_p: }
-      { \exp_not:N \token_if_letter:NTF #3 }
+    \exp_not:N \bool_if:NTF \l_text_titlecase_check_letter_bool
       {
-        \exp_not:N \bool_lazy_or:nnTF
-          { \exp_not:N \token_if_letter_p:N #3 }
-          { \exp_not:N \token_if_active_p:N #3 }
+        \bool_lazy_or:nnTF
+          { \sys_if_engine_luatex_p: }
+          { \sys_if_engine_xetex_p: }
+          { \exp_not:N \token_if_letter:NTF #3 }
+          {
+            \exp_not:N \bool_lazy_or:nnTF
+              { \exp_not:N \token_if_letter_p:N #3 }
+              { \exp_not:N \token_if_active_p:N #3 }
+          }
+          { \exp_not:N \use:c { __text_change_case_char_ #1 :nN } }
+          { \exp_not:N \__text_change_case_char_title:nnnN { title } {#1} }
       }
       { \exp_not:N \use:c { __text_change_case_char_ #1 :nN } }
-      { \exp_not:N \__text_change_case_char_title:nnnN { title } {#1} }
         {#2} #3
   }
 \cs_new_eq:NN \__text_change_case_char_titleonly:nnN
@@ -30312,7 +30320,7 @@
         \__kernel_msg_error:nnx
           { kernel } { quote-in-shell } {#1}
       }
-      { \__kernel_ior_open:Nn #2 { "|#1" } }
+      { \__kernel_ior_open:Nn #2 { |#1 } }
   }
 \__kernel_msg_new:nnnn { kernel } { pipe-failed }
   { Cannot~run~piped~system~commands. }