diff options
| author | Karl Williamson <public@khwilliamson.com> | 2012-02-24 09:32:58 -0700 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2012-02-24 09:50:28 -0700 |
| commit | ccb595a604afaac16b837cdda6d53203c733871d (patch) | |
| tree | d26b12d51d772ebf14d364441122f142da7c70f1 | |
| parent | a6836307311ae6667256d50a0fe9bc65ab3c5d75 (diff) | |
| download | perl-ccb595a604afaac16b837cdda6d53203c733871d.tar.gz | |
mktables: Correct Unicode 6.1 omission
Unicode 6.1 erroneously omitted Takri as a script that uses two
characters, and have voted to publish the correction that this patch
makes. There isn't an official Corrigendum yet.
| -rw-r--r-- | lib/unicore/mktables | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/unicore/mktables b/lib/unicore/mktables index 6da0063235..3c8e4d9252 100644 --- a/lib/unicore/mktables +++ b/lib/unicore/mktables @@ -11613,6 +11613,10 @@ sub filter_script_extensions_line { # 064B..0655 ; Arab Syrc # Mn [11] ARABIC FATHATAN..ARABIC HAMZA BELOW my @fields = split /\s*;\s*/; + + # This script was erroneously omitted in this Unicode version. + $fields[1] .= ' Takr' if $v_version eq v6.1.0 && $fields[0] =~ /^0964/; + my @full_names; foreach my $short_name (split " ", $fields[1]) { push @full_names, $script->table($short_name)->full_name; |