From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Fri, 14 Dec 2001 04:10:37 +0000 (+0000)
Subject: Detypo.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a58d912c5262ef3032191d4aea207683577527bb;p=p5sagit%2Fp5-mst-13.2.git

Detypo.

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

diff --git a/utf8.c b/utf8.c
index f11bc3a..75226ca 100644
--- a/utf8.c
+++ b/utf8.c
@@ -1247,7 +1247,7 @@ Perl_to_utf8_case(pTHX_ U8 *p, U8* ustrp, STRLEN *lenp, SV **swashp,char *normal
 	      return 0;
 	 }
     }
-    if *lenp)
+    if (lenp)
        *lenp = UNISKIP(uv);
     uvuni_to_utf8(ustrp, uv);
     return uv;