From: Karl Williamson <public@khwilliamson.com>
Date: Fri, 30 Dec 2011 16:11:23 +0000 (-0700)
Subject: mktables: Change function name
X-Git-Tag: accepted/trunk/20130322.191538~1429
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=ce4326557fd52ed5f0dbfaaf93f76209db291470;p=platform%2Fupstream%2Fperl.git

mktables: Change function name

This is in preparation for Unicode 6.1 for which the new name will make
more sense.
---

diff --git a/lib/unicore/mktables b/lib/unicore/mktables
index f4faadf..94062f2 100644
--- a/lib/unicore/mktables
+++ b/lib/unicore/mktables
@@ -11393,7 +11393,7 @@ sub  filter_script_extensions_line {
     return;
 }
 
-sub setup_v6_name_alias {
+sub setup_early_name_alias {
         property_ref('Name_Alias')->add_map(7, 7, "ALERT: control");
 }
 
@@ -15838,7 +15838,7 @@ my @input_file_objects = (
     Input_file->new('NameAliases.txt', v5.0.0,
                     Property => 'Name_Alias',
                     Pre_Handler => ($v_version ge v6.0.0)
-                                   ? \&setup_v6_name_alias
+                                   ? \&setup_early_name_alias
                                    : undef,
                     Each_Line_Handler =>
                                     \&filter_early_version_name_alias_line,