This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
f583b44
)
mktables: Change function name
author
Karl Williamson
<public@khwilliamson.com>
Fri, 30 Dec 2011 16:11:23 +0000
(09:11 -0700)
committer
Karl Williamson
<public@khwilliamson.com>
Fri, 30 Dec 2011 18:08:32 +0000
(11:08 -0700)
This is in preparation for Unicode 6.1 for which the new name will make
more sense.
lib/unicore/mktables
patch
|
blob
|
blame
|
history
diff --git
a/lib/unicore/mktables
b/lib/unicore/mktables
index
f4faadf
..
94062f2
100644
(file)
--- 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,