Changeset 5222 for lang/perl/Encode-JP-Mobile/trunk/tools

Timestamp:

01/22/08 07:53:29 (10 months ago)

Author:

tokuhirom

Message:

r5444@skinny (orig r5184): tokuhirom | 2008-01-21 21:37:26 +0900
x-sjis-kddi-(auto|cp932)-raw から |1 を削除。

Files:

• lang/perl/Encode-JP-Mobile/trunk/tools/make-kddi-ucm.pl (modified) (1 diff)

lang/perl/Encode-JP-Mobile/trunk/tools/make-kddi-ucm.pl

@@ -27 +27 @@
         next if /END CHARMAP/;
         print $_;
-    }
-    print "# Below are characters mapped $secondary, used in unicode -> encoding only\n";
-    for my $row (kddi_table($secondary)) {
-        printf "<U%s> %s |1 # KDDI/AU Pictogram\n", $row->{$secondary}, hexify($row->{sjis});
     }
     print "# below are copied from KDDI/AU's pictogram map\n";