diff options
author | Karl Williamson <public@khwilliamson.com> | 2012-02-15 12:07:01 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2012-02-15 18:02:35 -0700 |
commit | 29050de536086566fb4d4a9db818b8068dd118a0 (patch) | |
tree | 489f4b1bbf44ea5de60fea2e915f07eb88134e03 /pp.c | |
parent | 2e2b25717dbde8d9ce48b4b8dc443e1d08166347 (diff) | |
download | perl-29050de536086566fb4d4a9db818b8068dd118a0.tar.gz |
pp.c: white-space only
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 12 |
1 files changed, 6 insertions, 6 deletions
@@ -4088,7 +4088,7 @@ PP(pp_quotemeta) d = SvPVX(TARG); if (DO_UTF8(sv)) { while (len) { - STRLEN ulen = UTF8SKIP(s); + STRLEN ulen = UTF8SKIP(s); bool to_quote = FALSE; if (UTF8_IS_INVARIANT(*s)) { @@ -4109,11 +4109,11 @@ PP(pp_quotemeta) if (to_quote) { *d++ = '\\'; } - if (ulen > len) - ulen = len; - len -= ulen; - while (ulen--) - *d++ = *s++; + if (ulen > len) + ulen = len; + len -= ulen; + while (ulen--) + *d++ = *s++; } SvUTF8_on(TARG); } |