From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Fri, 30 Nov 2001 01:09:17 +0000 (+0000)
Subject: Use to_uni_fold (and add changed global.sym)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=596717cee028c8ad9e0b419ef9143521a52d81b0;p=p5sagit%2Fp5-mst-13.2.git

Use to_uni_fold (and add changed global.sym)

p4raw-id: //depot/perl@13375
---

diff --git a/utf8.c b/utf8.c
index 1a92962..8711137 100644
--- a/utf8.c
+++ b/utf8.c
@@ -1581,11 +1581,11 @@ Perl_ibcmp_utf8(pTHX_ const char *s1, bool u1, const char *s2, bool u2, register
 	  }
 	  if (ca != cb) {
 	       if (u1)
-		    to_uni_lower(NATIVE_TO_UNI(ca), tmpbuf1, &ulen1);
+		    to_uni_fold(NATIVE_TO_UNI(ca), tmpbuf1, &ulen1);
 	       else
 		    ulen1 = 1;
 	       if (u2)
-		    to_uni_lower(NATIVE_TO_UNI(cb), tmpbuf2, &ulen2);
+		    to_uni_fold(NATIVE_TO_UNI(cb), tmpbuf2, &ulen2);
 	       else
 		    ulen2 = 1;
 	       if (ulen1 != ulen2