diff options
author | Karl Williamson <public@khwilliamson.com> | 2011-12-30 09:11:23 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2011-12-30 11:08:32 -0700 |
commit | ce4326557fd52ed5f0dbfaaf93f76209db291470 (patch) | |
tree | 403af56e322c57084b25bdb97a002e5a8aa14192 /lib | |
parent | f583b44ccb789d15cd17cc20c0db8a39183cbf3c (diff) | |
download | perl-ce4326557fd52ed5f0dbfaaf93f76209db291470.tar.gz |
mktables: Change function name
This is in preparation for Unicode 6.1 for which the new name will make
more sense.
Diffstat (limited to 'lib')
-rw-r--r-- | lib/unicore/mktables | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/unicore/mktables b/lib/unicore/mktables index f4faadf9e1..94062f2e0b 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, |