diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-10-11 00:40:30 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-10-11 00:40:30 +0000 |
| commit | c71f135dc8b214a7f302aedfa9ad2ec63490adc2 (patch) | |
| tree | 70bb72bf93aff3894c0c607732bfa11b216596f0 | |
| parent | d9a374f9a3ea925f204ca6d0bdc88b9d6c09f5b9 (diff) | |
| download | perl-c71f135dc8b214a7f302aedfa9ad2ec63490adc2.tar.gz | |
The #7198 was a false alarm.
p4raw-id: //depot/perl@7200
| -rw-r--r-- | pp_hot.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -169,8 +169,7 @@ PP(pp_concat) s = (U8*)SvPV(right,len); if (TARG == right) { /* Take a copy since we're about to overwrite TARG */ - olds = s; - s = (U8*)savepvn((char*)s, len); + olds = s = (U8*)savepvn((char*)s, len); } if (!SvOK(left) && SvTYPE(left) <= SVt_PVMG) sv_setpv(left, ""); /* Suppress warning. */ |