diff options
author | Hugo van der Sanden <hv@crypt.org> | 2001-09-09 19:41:54 +0100 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-09-15 12:33:49 +0000 |
commit | 8bfdd7d95bcb290ba639e2c88c5d4370ab8fcfc0 (patch) | |
tree | 73ff47381401919d6d90daccf674fc93918f21a7 /op.c | |
parent | c366adb4d8e96138e96920f4a327296016a696e0 (diff) | |
download | perl-8bfdd7d95bcb290ba639e2c88c5d4370ab8fcfc0.tar.gz |
Re: [ID 20010815.012] Unfortunate interaction between -0 cmd line arg & (??{CODE}) regex
Message-Id: <200109091741.f89HfsM18534@crypt.compulink.co.uk>
p4raw-id: //depot/perl@12027
Diffstat (limited to 'op.c')
-rw-r--r-- | op.c | 2 |
1 files changed, 0 insertions, 2 deletions
@@ -4957,8 +4957,6 @@ Perl_newATTRSUB(pTHX_ I32 floor, OP *o, OP *proto, OP *attrs, OP *block) ENTER; SAVECOPFILE(&PL_compiling); SAVECOPLINE(&PL_compiling); - save_svref(&PL_rs); - sv_setsv(PL_rs, PL_nrs); if (!PL_beginav) PL_beginav = newAV(); |