summaryrefslogtreecommitdiff
path: root/systems/texlive/tlnet/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2022-04-04 03:14:42 +0000
committerNorbert Preining <norbert@preining.info>2022-04-04 03:14:42 +0000
commit7548e4d37c2aaefd32fe0a9bcd83f8e71326dde1 (patch)
treed335b608e63e9b3c37d7ba0e567c63e77250e171 /systems/texlive/tlnet/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm
parent506de1e2d3515161cdbc7018b4ccc9e49d7f86e8 (diff)
CTAN sync 202204040314
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm')
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm26
1 files changed, 13 insertions, 13 deletions
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm b/systems/texlive/tlnet/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm
index 73e4053ae8..2a2d2bb8cb 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm
@@ -4,21 +4,21 @@ use 5.006;
use strict;
use warnings;
-our $VERSION = '1.27';
+our $VERSION = '1.29';
my %jamo2prim = (
- '1100', 0x3D0C, '1101', 0x3D0D, '1102', 0x3D0E, '1103', 0x3D0F,
- '1105', 0x3D11, '1106', 0x3D12, '1107', 0x3D13, '1109', 0x3D15,
- '110A', 0x3D16, '110B', 0x3D17, '110C', 0x3D18, '110E', 0x3D1A,
- '110F', 0x3D1B, '1110', 0x3D1C, '1111', 0x3D1D, '1112', 0x3D1E,
- '1161', 0x3D8A, '1162', 0x3D8B, '1163', 0x3D8C, '1165', 0x3D8E,
- '1166', 0x3D8F, '1167', 0x3D90, '1168', 0x3D91, '1169', 0x3D92,
- '116A', 0x3D93, '116B', 0x3D94, '116C', 0x3D95, '116D', 0x3D96,
- '116E', 0x3D97, '116F', 0x3D98, '1170', 0x3D99, '1171', 0x3D9A,
- '1172', 0x3D9B, '1173', 0x3D9C, '1174', 0x3D9D, '1175', 0x3D9E,
- '11A8', 0x3DE8, '11AB', 0x3DEB, '11AF', 0x3DEF, '11B7', 0x3DF7,
- '11B8', 0x3DF8, '11BC', 0x3DFC, '11BD', 0x3DFD,
-); # for DUCET v10.0.0
+ '1100', 0x4175, '1101', 0x4176, '1102', 0x4177, '1103', 0x4178,
+ '1105', 0x417A, '1106', 0x417B, '1107', 0x417C, '1109', 0x417E,
+ '110A', 0x417F, '110B', 0x4180, '110C', 0x4181, '110E', 0x4183,
+ '110F', 0x4184, '1110', 0x4185, '1111', 0x4186, '1112', 0x4187,
+ '1161', 0x41F3, '1162', 0x41F4, '1163', 0x41F5, '1165', 0x41F7,
+ '1166', 0x41F8, '1167', 0x41F9, '1168', 0x41FA, '1169', 0x41FB,
+ '116A', 0x41FC, '116B', 0x41FD, '116C', 0x41FE, '116D', 0x41FF,
+ '116E', 0x4200, '116F', 0x4201, '1170', 0x4202, '1171', 0x4203,
+ '1172', 0x4204, '1173', 0x4205, '1174', 0x4206, '1175', 0x4207,
+ '11A8', 0x4251, '11AB', 0x4254, '11AF', 0x4258, '11B7', 0x4260,
+ '11B8', 0x4261, '11BC', 0x4265, '11BD', 0x4266,
+); # for DUCET v13.0.0
my(%u2e, $prim, $wt);
while (<DATA>) {