diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 1998-10-26 10:17:21 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 1998-10-26 10:17:21 +0000 |
commit | e108d8ad49a99087b30faabbb58257ee7465c5bc (patch) | |
tree | a9f37adcc4e47e5d7899f2390892fe46ba20fe07 /pp.c | |
parent | 2c88fa888f003d5ed662773b59e0a8b1ff819c61 (diff) | |
download | perl-e108d8ad49a99087b30faabbb58257ee7465c5bc.tar.gz |
Removed !(*s & 0x80) from pp_quotemeta(), introduced after
5_02 and really breaking things in non-ASCII worlds.
p4raw-id: //depot/cfgperl@2093
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2445,7 +2445,7 @@ PP(pp_quotemeta) SvGROW(TARG, (len * 2) + 1); d = SvPVX(TARG); while (len--) { - if (!(*s & 0x80) && !isALNUM(*s)) + if (!isALNUM(*s)) *d++ = '\\'; *d++ = *s++; } |