diff options
| author | Vincent Pit <perl@profvince.com> | 2008-03-31 21:05:44 +0200 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-03-31 19:48:26 +0000 |
| commit | c0dd94a09fcdb6ab5e0b1ca3c71b5902301ca665 (patch) | |
| tree | 23866137031f3fe990b0966110796c205f8855f3 /pp.c | |
| parent | cc8432b2c2234e63e6e0a56afb004bdbc786967e (diff) | |
| download | perl-c0dd94a09fcdb6ab5e0b1ca3c71b5902301ca665.tar.gz | |
Double magic with substr
Message-ID: <47F119E8.5010106@profvince.com>
p4raw-id: //depot/perl@33618
Diffstat (limited to 'pp.c')
| -rw-r--r-- | pp.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -3180,7 +3180,7 @@ PP(pp_substr) } if (!SvOK(sv)) sv_setpvs(sv, ""); - sv_insert(sv, pos, rem, repl, repl_len); + sv_insert_flags(sv, pos, rem, repl, repl_len, 0); if (repl_is_utf8) SvUTF8_on(sv); if (repl_sv_copy) |