diff options
author | Ilya Zakharevich <ilya@math.berkeley.edu> | 1998-11-25 21:46:20 -0500 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-11-28 18:46:05 +0000 |
commit | 9661b5442a5f8dacc64d54eb1de98575f21de5f2 (patch) | |
tree | 84e57af266a3e6712f3ef5d10290439b25673c13 /pp_ctl.c | |
parent | 4b6a72707ac8d719699d8abaea2936e151652d33 (diff) | |
download | perl-9661b5442a5f8dacc64d54eb1de98575f21de5f2.tar.gz |
applied suggested patch with PERL_OBJECT tweaks
Message-Id: <199811260746.CAA23164@monk.mps.ohio-state.edu>
Subject: [PATCH 5.005_53] Enable $_ and pos() inside (?{ CODE }) in RExen
p4raw-id: //depot/perl@2367
Diffstat (limited to 'pp_ctl.c')
-rw-r--r-- | pp_ctl.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -164,7 +164,7 @@ PP(pp_substcont) /* Are we done */ if (cx->sb_once || !CALLREGEXEC(rx, s, cx->sb_strend, orig, - s == m, Nullsv, cx->sb_targ, + s == m, cx->sb_targ, NULL, ((cx->sb_rflags & REXEC_COPY_STR) ? 0 : REXEC_COPY_STR))) { |