diff options
| -rw-r--r-- | lib/unicore/To/Lower.pl | 75 | ||||
| -rw-r--r-- | lib/unicore/To/Title.pl | 27 | ||||
| -rw-r--r-- | lib/unicore/mktables | 9 |
3 files changed, 6 insertions, 105 deletions
diff --git a/lib/unicore/To/Lower.pl b/lib/unicore/To/Lower.pl index 521d3a29ab..b7ef2a0da1 100644 --- a/lib/unicore/To/Lower.pl +++ b/lib/unicore/To/Lower.pl @@ -5,29 +5,6 @@ %utf8::ToSpecLower = ( -'00DF' => "\x{00DF}", -'0149' => "\x{0149}", -'01F0' => "\x{01F0}", -'0390' => "\x{0390}", -'03B0' => "\x{03B0}", -'0587' => "\x{0587}", -'1E96' => "\x{1E96}", -'1E97' => "\x{1E97}", -'1E98' => "\x{1E98}", -'1E99' => "\x{1E99}", -'1E9A' => "\x{1E9A}", -'1F50' => "\x{1F50}", -'1F52' => "\x{1F52}", -'1F54' => "\x{1F54}", -'1F56' => "\x{1F56}", -'1F80' => "\x{1F80}", -'1F81' => "\x{1F81}", -'1F82' => "\x{1F82}", -'1F83' => "\x{1F83}", -'1F84' => "\x{1F84}", -'1F85' => "\x{1F85}", -'1F86' => "\x{1F86}", -'1F87' => "\x{1F87}", '1F88' => "\x{1F80}", '1F89' => "\x{1F81}", '1F8A' => "\x{1F82}", @@ -36,14 +13,6 @@ '1F8D' => "\x{1F85}", '1F8E' => "\x{1F86}", '1F8F' => "\x{1F87}", -'1F90' => "\x{1F90}", -'1F91' => "\x{1F91}", -'1F92' => "\x{1F92}", -'1F93' => "\x{1F93}", -'1F94' => "\x{1F94}", -'1F95' => "\x{1F95}", -'1F96' => "\x{1F96}", -'1F97' => "\x{1F97}", '1F98' => "\x{1F90}", '1F99' => "\x{1F91}", '1F9A' => "\x{1F92}", @@ -52,14 +21,6 @@ '1F9D' => "\x{1F95}", '1F9E' => "\x{1F96}", '1F9F' => "\x{1F97}", -'1FA0' => "\x{1FA0}", -'1FA1' => "\x{1FA1}", -'1FA2' => "\x{1FA2}", -'1FA3' => "\x{1FA3}", -'1FA4' => "\x{1FA4}", -'1FA5' => "\x{1FA5}", -'1FA6' => "\x{1FA6}", -'1FA7' => "\x{1FA7}", '1FA8' => "\x{1FA0}", '1FA9' => "\x{1FA1}", '1FAA' => "\x{1FA2}", @@ -68,45 +29,9 @@ '1FAD' => "\x{1FA5}", '1FAE' => "\x{1FA6}", '1FAF' => "\x{1FA7}", -'1FB2' => "\x{1FB2}", -'1FB3' => "\x{1FB3}", -'1FB4' => "\x{1FB4}", -'1FB6' => "\x{1FB6}", -'1FB7' => "\x{1FB7}", '1FBC' => "\x{1FB3}", -'1FC2' => "\x{1FC2}", -'1FC3' => "\x{1FC3}", -'1FC4' => "\x{1FC4}", -'1FC6' => "\x{1FC6}", -'1FC7' => "\x{1FC7}", '1FCC' => "\x{1FC3}", -'1FD2' => "\x{1FD2}", -'1FD3' => "\x{1FD3}", -'1FD6' => "\x{1FD6}", -'1FD7' => "\x{1FD7}", -'1FE2' => "\x{1FE2}", -'1FE3' => "\x{1FE3}", -'1FE4' => "\x{1FE4}", -'1FE6' => "\x{1FE6}", -'1FE7' => "\x{1FE7}", -'1FF2' => "\x{1FF2}", -'1FF3' => "\x{1FF3}", -'1FF4' => "\x{1FF4}", -'1FF6' => "\x{1FF6}", -'1FF7' => "\x{1FF7}", '1FFC' => "\x{1FF3}", -'FB00' => "\x{FB00}", -'FB01' => "\x{FB01}", -'FB02' => "\x{FB02}", -'FB03' => "\x{FB03}", -'FB04' => "\x{FB04}", -'FB05' => "\x{FB05}", -'FB06' => "\x{FB06}", -'FB13' => "\x{FB13}", -'FB14' => "\x{FB14}", -'FB15' => "\x{FB15}", -'FB16' => "\x{FB16}", -'FB17' => "\x{FB17}", ); return <<'END'; diff --git a/lib/unicore/To/Title.pl b/lib/unicore/To/Title.pl index fa8401bdcc..1a584008be 100644 --- a/lib/unicore/To/Title.pl +++ b/lib/unicore/To/Title.pl @@ -28,14 +28,6 @@ '1F85' => "\x{1F8D}", '1F86' => "\x{1F8E}", '1F87' => "\x{1F8F}", -'1F88' => "\x{1F88}", -'1F89' => "\x{1F89}", -'1F8A' => "\x{1F8A}", -'1F8B' => "\x{1F8B}", -'1F8C' => "\x{1F8C}", -'1F8D' => "\x{1F8D}", -'1F8E' => "\x{1F8E}", -'1F8F' => "\x{1F8F}", '1F90' => "\x{1F98}", '1F91' => "\x{1F99}", '1F92' => "\x{1F9A}", @@ -44,14 +36,6 @@ '1F95' => "\x{1F9D}", '1F96' => "\x{1F9E}", '1F97' => "\x{1F9F}", -'1F98' => "\x{1F98}", -'1F99' => "\x{1F99}", -'1F9A' => "\x{1F9A}", -'1F9B' => "\x{1F9B}", -'1F9C' => "\x{1F9C}", -'1F9D' => "\x{1F9D}", -'1F9E' => "\x{1F9E}", -'1F9F' => "\x{1F9F}", '1FA0' => "\x{1FA8}", '1FA1' => "\x{1FA9}", '1FA2' => "\x{1FAA}", @@ -60,26 +44,16 @@ '1FA5' => "\x{1FAD}", '1FA6' => "\x{1FAE}", '1FA7' => "\x{1FAF}", -'1FA8' => "\x{1FA8}", -'1FA9' => "\x{1FA9}", -'1FAA' => "\x{1FAA}", -'1FAB' => "\x{1FAB}", -'1FAC' => "\x{1FAC}", -'1FAD' => "\x{1FAD}", -'1FAE' => "\x{1FAE}", -'1FAF' => "\x{1FAF}", '1FB2' => "\x{1FBA}\x{0345}", '1FB3' => "\x{1FBC}", '1FB4' => "\x{0386}\x{0345}", '1FB6' => "\x{0391}\x{0342}", '1FB7' => "\x{0391}\x{0342}\x{0345}", -'1FBC' => "\x{1FBC}", '1FC2' => "\x{1FCA}\x{0345}", '1FC3' => "\x{1FCC}", '1FC4' => "\x{0389}\x{0345}", '1FC6' => "\x{0397}\x{0342}", '1FC7' => "\x{0397}\x{0342}\x{0345}", -'1FCC' => "\x{1FCC}", '1FD2' => "\x{0399}\x{0308}\x{0300}", '1FD3' => "\x{0399}\x{0308}\x{0301}", '1FD6' => "\x{0399}\x{0342}", @@ -94,7 +68,6 @@ '1FF4' => "\x{038F}\x{0345}", '1FF6' => "\x{03A9}\x{0342}", '1FF7' => "\x{03A9}\x{0342}\x{0345}", -'1FFC' => "\x{1FFC}", 'FB00' => "\x{0046}\x{0066}", 'FB01' => "\x{0046}\x{0069}", 'FB02' => "\x{0046}\x{006C}", diff --git a/lib/unicore/mktables b/lib/unicore/mktables index 0ca6dcdaf0..2caf287c11 100644 --- a/lib/unicore/mktables +++ b/lib/unicore/mktables @@ -1635,9 +1635,12 @@ sub SpecialCasing_txt() # Wait until all the special cases have been read since # they are not listed in numeric order. my $ix = hex($code); - push @{$CaseInfo{Lower}}, [ $ix, $code, $lower ]; - push @{$CaseInfo{Title}}, [ $ix, $code, $title ]; - push @{$CaseInfo{Upper}}, [ $ix, $code, $upper ]; + push @{$CaseInfo{Lower}}, [ $ix, $code, $lower ] + unless $code eq $lower; + push @{$CaseInfo{Title}}, [ $ix, $code, $title ] + unless $code eq $title; + push @{$CaseInfo{Upper}}, [ $ix, $code, $upper ] + unless $code eq $upper; } close IN; |