[latex3-commits] [latex3/latex3] main: Collect 'active' spaces in sys-query (75db2e521)

github at latex-project.org github at latex-project.org
Mon Apr 8 13:05:31 CEST 2024


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

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

commit 75db2e52156f6a52d1fbdc7389d2ae32a583ef12
Author: Joseph Wright <joseph at texdev.net>
Date:   Mon Apr 8 12:05:31 2024 +0100

    Collect 'active' spaces in sys-query
    
    As suggested by DPC: avoids the need for a search-and-replace,


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

75db2e52156f6a52d1fbdc7389d2ae32a583ef12
 l3kernel/l3sys.dtx | 11 ++---------
 1 file changed, 2 insertions(+), 9 deletions(-)

diff --git a/l3kernel/l3sys.dtx b/l3kernel/l3sys.dtx
index 2ae622bfe..afa2184c6 100644
--- a/l3kernel/l3sys.dtx
+++ b/l3kernel/l3sys.dtx
@@ -1201,6 +1201,7 @@ end
               { \char_set_catcode_other:n {##1} }
             \int_step_inline:nnn { `z + 1 } { 127 }
               { \char_set_catcode_other:n {##1} }
+            \char_set_catcode_active:n { `\  }
             \tex_endlinechar:D 13 \scan_stop:
           }
         \l_@@_tmp_tl
@@ -1219,15 +1220,7 @@ end
       \group_end:
       \cs_new_protected:Npn \@@_get_query:Nw #1#2 * \q_stop
     }
-    {
-      \tl_set:Nn #1 {#2}
-      \tl_replace_all:Nnn #1
-        { \char_generate:nn { `\ } { 12 } }
-        {
-          \exp_after:wN \exp_after:wN \exp_after:wN \exp_not:N
-            \char_generate:nn { `\ } { 13 }
-        }
-    }
+    { \tl_set:Nn #1 {#2} }
 %    \end{macrocode}
 % \end{macro}
 % \end{macro}





More information about the latex3-commits mailing list.