From 9ba5575c1d28bd528491a29c6e400173f308e987 Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Fri, 30 Dec 2011 09:49:36 -0700 Subject: mktables: Fix bug for early Unicode versions mktables should be able to be run on any Unicode version. Prior to this patch, it was trying to do something unconditionally with the Name_Alias property, whereas it should only do that on versions that have this property. --- lib/unicore/mktables | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lib/unicore/mktables b/lib/unicore/mktables index 94062f2e0b..7b7af71396 100644 --- a/lib/unicore/mktables +++ b/lib/unicore/mktables @@ -9941,7 +9941,7 @@ END Range_Size_1 => \&output_perl_charnames_line, Type => $STRING, ); - $perl_charname->set_proxy_for('Name', 'Name_Alias'); + $perl_charname->set_proxy_for('Name'); my $Perl_decomp = Property->new('Perl_Decomposition_Mapping', Directory => File::Spec->curdir(), @@ -12212,6 +12212,7 @@ sub compile_perl() { my $alias = property_ref('Name_Alias'); if (defined $alias) { push @composition, 'Name_Alias'; + $perl_charname->set_proxy_for('Name_Alias'); $alias->reset_each_range; while (my ($range) = $alias->each_range) { next if $range->value eq ""; -- cgit v1.2.1