summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Unicode/Collate/CJK')
-rw-r--r--Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Big5.pm2
-rw-r--r--Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/GB2312.pm2
-rw-r--r--Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/JISX0208.pm2
-rw-r--r--Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm26
-rw-r--r--Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Pinyin.pm2
-rw-r--r--Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Stroke.pm2
-rwxr-xr-xMaster/tlpkg/tlperl/lib/Unicode/Collate/CJK/Zhuyin.pm2
7 files changed, 19 insertions, 19 deletions
diff --git a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Big5.pm b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Big5.pm
index 5fcd9c00053..95516a3d766 100644
--- a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Big5.pm
+++ b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Big5.pm
@@ -4,7 +4,7 @@ use 5.006;
use strict;
use warnings;
-our $VERSION = '1.25';
+our $VERSION = '1.27';
my %u2p;
my $wt = 0x8000;
diff --git a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/GB2312.pm b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/GB2312.pm
index 69626649d61..67927c78ad3 100644
--- a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/GB2312.pm
+++ b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/GB2312.pm
@@ -4,7 +4,7 @@ use 5.006;
use strict;
use warnings;
-our $VERSION = '1.25';
+our $VERSION = '1.27';
my %u2p;
my $wt = 0x8000;
diff --git a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/JISX0208.pm b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/JISX0208.pm
index b36750136b4..b21c9dd5dad 100644
--- a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/JISX0208.pm
+++ b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/JISX0208.pm
@@ -4,7 +4,7 @@ use 5.006;
use strict;
use warnings;
-our $VERSION = '1.25';
+our $VERSION = '1.27';
my %u2p;
my $wt = 0x8000;
diff --git a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Korean.pm
index 6905f20614d..73e4053ae8c 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 warnings;
-our $VERSION = '1.25';
+our $VERSION = '1.27';
my %jamo2prim = (
- '1100', 0x3BF5, '1101', 0x3BF6, '1102', 0x3BF7, '1103', 0x3BF8,
- '1105', 0x3BFA, '1106', 0x3BFB, '1107', 0x3BFC, '1109', 0x3BFE,
- '110A', 0x3BFF, '110B', 0x3C00, '110C', 0x3C01, '110E', 0x3C03,
- '110F', 0x3C04, '1110', 0x3C05, '1111', 0x3C06, '1112', 0x3C07,
- '1161', 0x3C73, '1162', 0x3C74, '1163', 0x3C75, '1165', 0x3C77,
- '1166', 0x3C78, '1167', 0x3C79, '1168', 0x3C7A, '1169', 0x3C7B,
- '116A', 0x3C7C, '116B', 0x3C7D, '116C', 0x3C7E, '116D', 0x3C7F,
- '116E', 0x3C80, '116F', 0x3C81, '1170', 0x3C82, '1171', 0x3C83,
- '1172', 0x3C84, '1173', 0x3C85, '1174', 0x3C86, '1175', 0x3C87,
- '11A8', 0x3CD1, '11AB', 0x3CD4, '11AF', 0x3CD8, '11B7', 0x3CE0,
- '11B8', 0x3CE1, '11BC', 0x3CE5, '11BD', 0x3CE6,
-); # for DUCET v9.0.0
+ '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
my(%u2e, $prim, $wt);
while (<DATA>) {
diff --git a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Pinyin.pm b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Pinyin.pm
index 483c1e90588..a21554f4005 100644
--- a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Pinyin.pm
+++ b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Pinyin.pm
@@ -4,7 +4,7 @@ use 5.006;
use strict;
use warnings;
-our $VERSION = '1.25';
+our $VERSION = '1.27';
my %u2p;
my $wt = 0x8000;
diff --git a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Stroke.pm b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Stroke.pm
index 3b6684b4917..2e7f5354283 100644
--- a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Stroke.pm
+++ b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Stroke.pm
@@ -4,7 +4,7 @@ use 5.006;
use strict;
use warnings;
-our $VERSION = '1.25';
+our $VERSION = '1.27';
my %u2p;
my $wt = 0x8000;
diff --git a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Zhuyin.pm b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Zhuyin.pm
index d21cb8923b3..61f027d4974 100755
--- a/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Zhuyin.pm
+++ b/Master/tlpkg/tlperl/lib/Unicode/Collate/CJK/Zhuyin.pm
@@ -4,7 +4,7 @@ use 5.006;
use strict;
use warnings;
-our $VERSION = '1.25';
+our $VERSION = '1.27';
my %u2p;
my $wt = 0x8000;