Show
Ignore:
Timestamp:
11/12/07 21:42:47 (6 years ago)
Author:
miyagawa
Message:

added KDDI-auto SJIS mapping. Renamed encodings to x-sjis-*

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • lang/perl/Encode-JP-Mobile/trunk/t/emoji_convert.t

    r1163 r1331  
    1212 
    1313for my $pict (@map) { 
    14     is encode('shift_jis-ezweb', decode('shift_jis-imode', $pict->{imode})) 
     14    is encode('x-sjis-ezweb', decode('x-sjis-imode', $pict->{imode})) 
    1515        => $pict->{ezweb},  
    1616        "imode => ezweb ($pict->{name})"; 
    17      
    18     is encode('shift_jis-imode', decode('shift_jis-imode', $pict->{imode})) 
     17 
     18    is encode('x-sjis-imode', decode('x-sjis-imode', $pict->{imode})) 
    1919        => $pict->{imode},  
    2020        "imode => imode ($pict->{name})"; 
    21      
    22     is encode('shift_jis-imode', decode('shift_jis-ezweb', $pict->{ezweb})) 
     21 
     22    is encode('x-sjis-imode', decode('x-sjis-ezweb', $pict->{ezweb})) 
    2323        => $pict->{imode},  
    2424        "ezweb => imode ($pict->{name})"; 
    25      
    26     is encode('shift_jis-ezweb', decode('shift_jis-ezweb', $pict->{ezweb})) 
     25 
     26    is encode('x-sjis-ezweb', decode('x-sjis-ezweb', $pict->{ezweb})) 
    2727        => $pict->{ezweb},  
    2828        "ezweb => ezweb ($pict->{name})";