summaryrefslogtreecommitdiff
path: root/pp.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>1998-10-26 10:17:21 +0000
committerJarkko Hietaniemi <jhi@iki.fi>1998-10-26 10:17:21 +0000
commite108d8ad49a99087b30faabbb58257ee7465c5bc (patch)
treea9f37adcc4e47e5d7899f2390892fe46ba20fe07 /pp.c
parent2c88fa888f003d5ed662773b59e0a8b1ff819c61 (diff)
downloadperl-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.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp.c b/pp.c
index 05b242a619..6a93287fdf 100644
--- a/pp.c
+++ b/pp.c
@@ -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++;
}