revise mktables.PL for bugs and newness in Unicode 3.0

[perl5.git] / lib / unicode / Is / Upper.pl

diff --git a/lib/unicode/Is/Upper.pl b/lib/unicode/Is/Upper.pl
index 8dde274..4fda655 100644 (file)
--- a/lib/unicode/Is/Upper.pl
+++ b/lib/unicode/Is/Upper.pl
@@ -86,9 +86,9 @@ return <<'END';
 01b5   
 01b7   01b8
 01bc   
-01c4   
-01c7   
-01ca   
+01c4   01c5
+01c7   01c8
+01ca   01cb
 01cd   
 01cf   
 01d1   
@@ -106,7 +106,7 @@ return <<'END';
 01ea   
 01ec   
 01ee   
-01f1   
+01f1   01f2
 01f4   
 01f6   01f8
 01fa   
@@ -355,11 +355,14 @@ return <<'END';
 1f5d   
 1f5f   
 1f68   1f6f
-1fb8   1fbb
-1fc8   1fcb
+1f88   1f8f
+1f98   1f9f
+1fa8   1faf
+1fb8   1fbc
+1fc8   1fcc
 1fd8   1fdb
 1fe8   1fec
-1ff8   1ffb
+1ff8   1ffc
 2102   
 2107   
 210b   210d