diff options
| author | Gisle Aas <gisle@aas.no> | 2004-01-16 17:29:02 -0800 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2004-01-19 22:32:27 +0000 |
| commit | d0a21e0008d063055a75cb0839423bc677ec5a5a (patch) | |
| tree | 9fbb3c0a05876b3613d2ad378d500537ceda9e6e /pp.c | |
| parent | 4b1aa53e75357addb0d99a877dc385e70b2f795b (diff) | |
| download | perl-d0a21e0008d063055a75cb0839423bc677ec5a5a.tar.gz | |
Re: [perl #24926] chop/~ mangles UTF8 [PATCH]
Message-ID: <lrn08m7wkh.fsf@caliper.activestate.com>
(test rewritten to fit in blead)
p4raw-id: //depot/perl@22180
Diffstat (limited to 'pp.c')
| -rw-r--r-- | pp.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -2417,6 +2417,7 @@ PP(pp_complement) *result = '\0'; result -= nchar; sv_setpvn(TARG, (char*)result, nchar); + SvUTF8_off(TARG); } Safefree(result); SETs(TARG); |