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

Timestamp:

01/22/08 11:40:44 (10 months ago)

Author:

miyagawa

Message:

always get english name from docomo

Files:

• lang/perl/Encode-JP-Mobile/trunk/tools/add-names-by-mapping.pl (modified) (1 diff)

lang/perl/Encode-JP-Mobile/trunk/tools/add-names-by-mapping.pl

@@ -14 +14 @@
 my $dat = YAML::LoadFile($file);
 my $from = ($file =~ /(\w*)-table\.yaml/)[0] or die;
-$to ||= $from eq 'kddi' ? 'docomo' : 'kddi';
+$to ||= 'docomo';
 
 warn "Updating $from table by mapping to $to pictograms\n";