summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm')
-rw-r--r--Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm26
1 files changed, 13 insertions, 13 deletions
diff --git a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm
index 7d19eac9488..1d67f1392b4 100644
--- a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm
+++ b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm
@@ -4,21 +4,21 @@ use 5.006;
use strict;
use Unicode::Collate;
-our $VERSION = '0.88';
+our $VERSION = '0.93';
my %jamo2prim = (
- 0x1100, 0x313B, 0x1101, 0x313C, 0x1102, 0x313D, 0x1103, 0x313E,
- 0x1105, 0x3140, 0x1106, 0x3141, 0x1107, 0x3142, 0x1109, 0x3144,
- 0x110A, 0x3145, 0x110B, 0x3146, 0x110C, 0x3147, 0x110E, 0x3149,
- 0x110F, 0x314A, 0x1110, 0x314B, 0x1111, 0x314C, 0x1112, 0x314D,
- 0x1161, 0x31B9, 0x1162, 0x31BA, 0x1163, 0x31BB, 0x1165, 0x31BD,
- 0x1166, 0x31BE, 0x1167, 0x31BF, 0x1168, 0x31C0, 0x1169, 0x31C1,
- 0x116A, 0x31C2, 0x116B, 0x31C3, 0x116C, 0x31C4, 0x116D, 0x31C5,
- 0x116E, 0x31C6, 0x116F, 0x31C7, 0x1170, 0x31C8, 0x1171, 0x31C9,
- 0x1172, 0x31CA, 0x1173, 0x31CB, 0x1174, 0x31CC, 0x1175, 0x31CD,
- 0x11A8, 0x3217, 0x11AB, 0x321A, 0x11AF, 0x321E, 0x11B7, 0x3226,
- 0x11B8, 0x3227, 0x11BC, 0x322B, 0x11BD, 0x322C,
-); # for DUCET v6.1.0
+ 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
my(%u2e, $prim, $wt);
while (<DATA>) {