summaryrefslogtreecommitdiff
path: root/cpan/Unicode-Collate/Collate/CJK/Korean.pm
diff options
context:
space:
mode:
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>2013-11-02 22:43:50 +0000
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>2013-11-02 22:43:50 +0000
commit2b4887303b3930e7022307ef8e74ca51b5132e32 (patch)
tree55a789f3d93b0303003ab9c8913645bc0a9015ab /cpan/Unicode-Collate/Collate/CJK/Korean.pm
parentc1c1a1b299ba6939da0476f4be1fff1333edcc5f (diff)
downloadperl-2b4887303b3930e7022307ef8e74ca51b5132e32.tar.gz
Update Unicode-Collate to CPAN version 1.01
[DELTA] 1.01 Sat Nov 2 19:00:38 2013 - DUCET is updated (for Unicode 6.3.0) as Collate/allkeys.txt. ! Please notice that allkeys.txt will be overwritten if you have had other allkeys.txt already. - The default UCA_Version is 28. - Locale/*.pl (except fr.pl) and CJK/Korean.pm are updated. - modified tests: loc_es.t, loc_estr.t, rewrite.t, version.t in t.
Diffstat (limited to 'cpan/Unicode-Collate/Collate/CJK/Korean.pm')
-rw-r--r--cpan/Unicode-Collate/Collate/CJK/Korean.pm24
1 files changed, 12 insertions, 12 deletions
diff --git a/cpan/Unicode-Collate/Collate/CJK/Korean.pm b/cpan/Unicode-Collate/Collate/CJK/Korean.pm
index 1d67f1392b..4461090d23 100644
--- a/cpan/Unicode-Collate/Collate/CJK/Korean.pm
+++ b/cpan/Unicode-Collate/Collate/CJK/Korean.pm
@@ -7,18 +7,18 @@ use Unicode::Collate;
our $VERSION = '0.93';
my %jamo2prim = (
- 0x1100, 0x3156, 0x1101, 0x3157, 0x1102, 0x3158, 0x1103, 0x3159,
- 0x1105, 0x315B, 0x1106, 0x315C, 0x1107, 0x315D, 0x1109, 0x315F,
- 0x110A, 0x3160, 0x110B, 0x3161, 0x110C, 0x3162, 0x110E, 0x3164,
- 0x110F, 0x3165, 0x1110, 0x3166, 0x1111, 0x3167, 0x1112, 0x3168,
- 0x1161, 0x31D4, 0x1162, 0x31D5, 0x1163, 0x31D6, 0x1165, 0x31D8,
- 0x1166, 0x31D9, 0x1167, 0x31DA, 0x1168, 0x31DB, 0x1169, 0x31DC,
- 0x116A, 0x31DD, 0x116B, 0x31DE, 0x116C, 0x31DF, 0x116D, 0x31E0,
- 0x116E, 0x31E1, 0x116F, 0x31E2, 0x1170, 0x31E3, 0x1171, 0x31E4,
- 0x1172, 0x31E5, 0x1173, 0x31E6, 0x1174, 0x31E7, 0x1175, 0x31E8,
- 0x11A8, 0x3232, 0x11AB, 0x3235, 0x11AF, 0x3239, 0x11B7, 0x3241,
- 0x11B8, 0x3242, 0x11BC, 0x3246, 0x11BD, 0x3247,
-); # for DUCET v6.2.0
+ 0x1100, 0x3152, 0x1101, 0x3153, 0x1102, 0x3154, 0x1103, 0x3155,
+ 0x1105, 0x3157, 0x1106, 0x3158, 0x1107, 0x3159, 0x1109, 0x315B,
+ 0x110A, 0x315C, 0x110B, 0x315D, 0x110C, 0x315E, 0x110E, 0x3160,
+ 0x110F, 0x3161, 0x1110, 0x3162, 0x1111, 0x3163, 0x1112, 0x3164,
+ 0x1161, 0x31D0, 0x1162, 0x31D1, 0x1163, 0x31D2, 0x1165, 0x31D4,
+ 0x1166, 0x31D5, 0x1167, 0x31D6, 0x1168, 0x31D7, 0x1169, 0x31D8,
+ 0x116A, 0x31D9, 0x116B, 0x31DA, 0x116C, 0x31DB, 0x116D, 0x31DC,
+ 0x116E, 0x31DD, 0x116F, 0x31DE, 0x1170, 0x31DF, 0x1171, 0x31E0,
+ 0x1172, 0x31E1, 0x1173, 0x31E2, 0x1174, 0x31E3, 0x1175, 0x31E4,
+ 0x11A8, 0x322E, 0x11AB, 0x3231, 0x11AF, 0x3235, 0x11B7, 0x323D,
+ 0x11B8, 0x323E, 0x11BC, 0x3242, 0x11BD, 0x3243,
+); # for DUCET v6.3.0
my(%u2e, $prim, $wt);
while (<DATA>) {