In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/490d91dd1a0e93241f348b009a39fe6a61fc2256?hp=4d4ca6a56be9d33d931a2fa0cdd3ab836ad49e79>
- Log ----------------------------------------------------------------- commit 490d91dd1a0e93241f348b009a39fe6a61fc2256 Author: Father Chrysostomos <[email protected]> Date: Mon Nov 29 21:56:25 2010 -0800 Oops. That was part of my first attempt to fix [perl #68560]. I forgot to delete it. (Itâs harmless.) ----------------------------------------------------------------------- Summary of changes: pp_hot.c | 1 - 1 files changed, 0 insertions(+), 1 deletions(-) diff --git a/pp_hot.c b/pp_hot.c index 2176bac..c2b05ca 100644 --- a/pp_hot.c +++ b/pp_hot.c @@ -297,7 +297,6 @@ PP(pp_concat) PP(pp_padsv) { dVAR; dSP; dTARGET; - if(!TARG) TARG = PAD_SVl(PL_op->op_targ) = newSV(0); XPUSHs(TARG); if (PL_op->op_flags & OPf_MOD) { if (PL_op->op_private & OPpLVAL_INTRO) -- Perl5 Master Repository
