diff options
Diffstat (limited to 'Master/texmf-dist/tex/latex/l3kernel/l3file.sty')
-rw-r--r-- | Master/texmf-dist/tex/latex/l3kernel/l3file.sty | 16 |
1 files changed, 9 insertions, 7 deletions
diff --git a/Master/texmf-dist/tex/latex/l3kernel/l3file.sty b/Master/texmf-dist/tex/latex/l3kernel/l3file.sty index a0c3041c822..6019110f675 100644 --- a/Master/texmf-dist/tex/latex/l3kernel/l3file.sty +++ b/Master/texmf-dist/tex/latex/l3kernel/l3file.sty @@ -22,7 +22,7 @@ %% %% http://www.latex-project.org/lppl.txt %% -%% This file is part of the "expl3 bundle" (The Work in LPPL) +%% This file is part of the "l3kernel bundle" (The Work in LPPL) %% and all files in that bundle must be distributed together. %% %% The released version of this bundle is available from CTAN. @@ -46,7 +46,7 @@ %% %% ----------------------------------------------------------------------- \RequirePackage{l3names} -\GetIdInfo$Id: l3file.dtx 2665 2011-08-25 22:15:27Z joseph $ +\GetIdInfo$Id: l3file.dtx 2776 2011-09-07 18:33:19Z joseph $ {L3 Experimental file operations} \ProvidesExplPackage {\ExplFileName}{\ExplFileDate}{\ExplFileVersion}{\ExplFileDescription} @@ -58,6 +58,7 @@ \tl_new:N \l_file_name_tl \seq_new:N \l_file_search_path_seq \seq_new:N \l_file_search_path_saved_seq +\seq_new:N \l_file_tmpa_seq \cs_new_protected_nopar:Npn \file_add_path:nN #1#2 { \ior_open:Nn \g_file_test_stream {#1} @@ -74,8 +75,9 @@ \cs_if_exist:NT \input@path { \seq_set_eq:NN \l_file_search_path_saved_seq \l_file_search_path_seq - \clist_map_inline:Nn \input@path - { \seq_put_right:Nn \l_file_search_path_seq {##1} } + \seq_set_from_clist:NN \l_file_tmpa_seq \input@path + \seq_concat:NNN \l_file_search_path_seq + \l_file_search_path_seq \l_file_tmpa_seq } \seq_map_inline:Nn \l_file_search_path_seq { @@ -105,7 +107,7 @@ \@addtofilelist {#1} \seq_gpush:NV \g_file_stack_seq \g_file_current_name_tl \tl_gset:Nn \g_file_current_name_tl {#1} - \exp_after:wN \tex_input:D \l_file_name_tl ~ + \exp_after:wN \tex_input:D \l_file_name_tl \c_space_tl \seq_gpop:NN \g_file_stack_seq \g_file_current_name_tl } } @@ -125,8 +127,8 @@ } \AtBeginDocument { - \clist_map_inline:Nn \@filelist - { \seq_put_right:Nn \g_file_record_seq {#1} } + \seq_set_from_clist:NN \l_file_tmpa_seq \@filelist + \seq_gconcat:NNN \g_file_record_seq \g_file_record_seq \l_file_tmpa_seq } %% %% |