In perl.git, the branch blead has been updated
<http://perl5.git.perl.org/perl.git/commitdiff/3d8e05a034fc6625a503b87c8ac336d4d84fb338?hp=9ea12537a494a537e72f6853f48253349ee8d82d>
- Log -----------------------------------------------------------------
commit 3d8e05a034fc6625a503b87c8ac336d4d84fb338
Author: Zefram <zef...@fysh.org>
Date: Sat Sep 11 11:37:04 2010 +0100
fix MAD breakage caused by qw patch
ea25a9b2cf73948b1e8c5675de027e0ad13277bd broke MAD due to incorrect
usage of the token-forcing mechanism.
-----------------------------------------------------------------------
Summary of changes:
toke.c | 1 +
1 files changed, 1 insertions(+), 0 deletions(-)
diff --git a/toke.c b/toke.c
index a7ec612..b8694a6 100644
--- a/toke.c
+++ b/toke.c
@@ -13993,6 +13993,7 @@ Perl_coerce_qwlist_to_paren_list(pTHX_ OP *qwlist)
op_free(qwlist);
}
else {
+ start_force(PL_curforce);
NEXTVAL_NEXTTOKE.opval = qwlist;
force_next(THING);
}
--
Perl5 Master Repository
