summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2011-02-19 16:31:05 -0700
committerKarl Williamson <public@khwilliamson.com>2011-02-19 17:35:14 -0700
commitda36747dd51a927ea304a8bfab181c8e794b1e17 (patch)
treec56c4aa32b67e4f20578b7e7c243dcd6a14c6c4b
parentde87c4fec898d44ec7ff4bdaba989015b8ec0089 (diff)
downloadperl-da36747dd51a927ea304a8bfab181c8e794b1e17.tar.gz
utf8.c: Fix setting wrong variable
This doesn't appear to actually break anything.
-rw-r--r--utf8.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/utf8.c b/utf8.c
index 565f37d2c0..d496afce75 100644
--- a/utf8.c
+++ b/utf8.c
@@ -3206,7 +3206,7 @@ Perl_foldEQ_utf8_flags(pTHX_ const char *s1, char **pe1, register UV l1, bool u1
else {
*foldbuf2 = TWO_BYTE_UTF8_TO_UNI(*p2, *(p2 + 1));
}
- n1 = 1;
+ n2 = 1;
}
else if (isASCII(*p2)) {
if (flags && ! isASCII(*p1)) {