[latex3-commits] [latex3/latex3] main: Normalize return paths in ls on Windows (6001a303f)

[github at latex-project.org]

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

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

commit 6001a303fc26b5bb3d21c5e6676bc0b8dc6f88d4
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Tue Feb 20 08:09:47 2024 +0000

    Normalize return paths in ls on Windows


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

6001a303fc26b5bb3d21c5e6676bc0b8dc6f88d4
 l3experimental/l3sys-shell/l3sys-shell.dtx | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/l3experimental/l3sys-shell/l3sys-shell.dtx b/l3experimental/l3sys-shell/l3sys-shell.dtx
index bbc40ba16..cbf78cb6a 100644
--- a/l3experimental/l3sys-shell/l3sys-shell.dtx
+++ b/l3experimental/l3sys-shell/l3sys-shell.dtx
@@ -417,8 +417,11 @@
         \seq_clear:N #2
         \seq_map_inline:Nn \exp_not:N \l_@@_tmp_seq
           {
-            \seq_put_right:Ne #2
+            \tl_set:Ne \exp_not:N \l_@@_tmp_tl
               { \exp_not:N  \@@_shell_split_ls:w ##1 }
+            \tl_replace_all:Nnn \exp_not:N \l_@@_tmp_tl
+              { \c_backslash_str } { / }
+            \seq_put_right:NV #2 \exp_not:N \l_@@_tmp_tl
           }
       }
     \cs_new:Npn \@@_shell_split_ls:w { }