Changeset 3531 for trunk/lib/MT/I18N

Show
Ignore:
Timestamp:
03/12/09 09:11:52 (9 months ago)
Author:
fumiakiy
Message:

Merged sockfish to trunk. "svn merge -r3114:3527 http://code.sixapart.com/svn/movabletype/branches/sockfish/ ."

Location:
trunk/lib/MT/I18N
Files:
3 modified

Legend:

Unmodified
Added
Removed
  • trunk/lib/MT/I18N/default.pm

    r2967 r3531  
    1 # Movable Type (r) Open Source (C) 2001-2008 Six Apart, Ltd. 
     1# Movable Type (r) Open Source (C) 2001-2009 Six Apart, Ltd. 
    22# This program is distributed under the terms of the 
    33# GNU General Public License, version 2. 
     
    6060    $class->$meth(@_); 
    6161} 
     62 
     63sub encode { 
     64    my $class = shift; 
     65    my $meth = 'encode_' . ($PKG || $class->_load_module); 
     66    $class->$meth(@_); 
     67} 
     68 
    6269sub guess_encoding { 
    6370    my $class = shift; 
     
    105112    $class->$meth(@_); 
    106113} 
     114 
    107115sub decode_utf8 { 
    108116    my $class = shift; 
     
    132140 
    133141sub decode_perl { 
     142    my $class = shift; 
     143    my ($enc, $text) = @_; 
     144    $text; 
     145} 
     146 
     147sub encode_perl { 
    134148    my $class = shift; 
    135149    my ($enc, $text) = @_; 
  • trunk/lib/MT/I18N/en_us.pm

    r1174 r3531  
    1 # Movable Type (r) Open Source (C) 2001-2008 Six Apart, Ltd. 
     1# Movable Type (r) Open Source (C) 2001-2009 Six Apart, Ltd. 
    22# This program is distributed under the terms of the 
    33# GNU General Public License, version 2. 
  • trunk/lib/MT/I18N/ja.pm

    r2929 r3531  
    1 # Movable Type (r) Open Source (C) 2001-2008 Six Apart, Ltd. 
     1# Movable Type (r) Open Source (C) 2001-2009 Six Apart, Ltd. 
    22# This program is distributed under the terms of the 
    33# GNU General Public License, version 2. 
     
    8484    $enc = $class->_conv_enc_label($enc); 
    8585    return $enc; 
     86} 
     87 
     88sub encode_jcode { 
     89    my $class = shift; 
     90    my ($enc, $text) = @_; 
     91    return $class->encode_text_jcode($text, 'utf-8', $enc); 
    8692} 
    8793