latex3 (12mar13)

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

1 files changed, 5 insertions, 7 deletions

diff --git a/Master/texmf-dist/tex/latex/l3kernel/l3token.sty b/Master/texmf-dist/tex/latex/l3kernel/l3token.sty
index c4b3a28e6a5..5dd39858b49 100644
--- a/Master/texmf-dist/tex/latex/l3kernel/l3token.sty
+++ b/Master/texmf-dist/tex/latex/l3kernel/l3token.sty
@@ -13,7 +13,7 @@
 %% 
 %% Do not distribute a modified version of this file.
 %% 
-%% File: l3token.dtx Copyright (C) 2005-2012 The LaTeX3 Project
+%% File: l3token.dtx Copyright (C) 2005-2013 The LaTeX3 Project
 %%
 %% It may be distributed and/or modified under the conditions of the
 %% LaTeX Project Public License (LPPL), either version 1.3c of this
@@ -46,7 +46,7 @@
 %%
 %% -----------------------------------------------------------------------
 \RequirePackage{l3bootstrap}
-\GetIdInfo$Id: l3token.dtx 4384 2012-12-20 15:47:56Z bruno $
+\GetIdInfo$Id: l3token.dtx 4428 2013-01-10 13:23:29Z bruno $
   {L3 Experimental token manipulation}
 \ProvidesExplPackage
   {\ExplFileName}{\ExplFileDate}{\ExplFileVersion}{\ExplFileDescription}
@@ -617,15 +617,13 @@
 \cs_new_protected_nopar:Npn \__peek_ignore_spaces_execute_branches:
   {
     \if_meaning:w \l_peek_token \c_space_token
-      \tex_afterassignment:D \__peek_ignore_spaces_execute_branches_aux:
-      \exp_after:wN \cs_set_eq:NN
-      \exp_after:wN \__peek_tmp:w
+      \exp_after:wN \peek_after:Nw
+      \exp_after:wN \__peek_ignore_spaces_execute_branches:
+      \tex_romannumeral:D -`0
     \else:
       \exp_after:wN \__peek_execute_branches:
     \fi:
   }
-\cs_new_protected_nopar:Npn \__peek_ignore_spaces_execute_branches_aux:
-  { \peek_after:Nw \__peek_ignore_spaces_execute_branches: }
 \group_begin:
   \cs_set:Npn \__peek_def:nnnn #1#2#3#4
     {