From 2c0c5f92cc8c83f85f490c4724df41382ded08d0 Mon Sep 17 00:00:00 2001
From: Andy Lester <andy@petdance.com>
Date: Sat, 4 Jun 2005 18:09:04 -0500
Subject: Fix minor bummer in 24706 Message-Id:
 <20050605040904.GA27783@petdance.com>

p4raw-id: //depot/perl@24707
---
 utf8.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/utf8.c b/utf8.c
index 53983cbeae..5a80bfdca0 100644
--- a/utf8.c
+++ b/utf8.c
@@ -246,7 +246,7 @@ Perl_is_utf8_char(pTHX_ const U8 *s)
     if (len <= 4)
         return IS_UTF8_CHAR(s, len) ? len : 0;
 #endif /* #ifdef IS_UTF8_CHAR */
-    return S_is_utf8_char_slow(s, len);
+    return is_utf8_char_slow(s, len);
 }
 
 /*
@@ -285,7 +285,7 @@ Perl_is_utf8_string(pTHX_ const U8 *s, STRLEN len)
 		 if (!IS_UTF8_CHAR(x, c))
 		     return FALSE;
 	     } else {
-		 if (!S_is_utf8_char_slow(x, c))
+		 if (!is_utf8_char_slow(x, c))
 		     return FALSE;
 	     }
 #else
-- 
cgit v1.2.1