From: Karl Williamson <public@khwilliamson.com>
Date: Wed, 28 Sep 2011 15:14:52 +0000 (-0600)
Subject: utf8.c: Call new function invlist_invert_prop()
X-Git-Tag: accepted/trunk/20130322.191538~2559
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=45bb2768cee5570e1fb15c763f1585fd2010f130;p=platform%2Fupstream%2Fperl.git

utf8.c: Call new function invlist_invert_prop()

This new function is now potentially called.  However, there is no data file
or other circumstances which currently cause this path to get executed.
---

diff --git a/utf8.c b/utf8.c
index 724f184..57532cb 100644
--- a/utf8.c
+++ b/utf8.c
@@ -2977,7 +2977,7 @@ Perl__swash_to_invlist(pTHX_ SV* const swash)
 
     /* Invert if the data says it should be */
     if (invert_it_svp && SvUV(*invert_it_svp)) {
-	_invlist_invert(invlist);
+	_invlist_invert_prop(invlist);
     }
 
     /* This code is copied from swash_get()