diff options
Diffstat (limited to 'fml/lib')
| -rw-r--r-- | fml/lib/Mail/Message/Charset.pm | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/fml/lib/Mail/Message/Charset.pm b/fml/lib/Mail/Message/Charset.pm index 0f130ad8..a229abfc 100644 --- a/fml/lib/Mail/Message/Charset.pm +++ b/fml/lib/Mail/Message/Charset.pm @@ -176,8 +176,8 @@ my %internal_charset_map = ( my %message_charset_map = ( - 'ja' => 'iso-2022-jp', - 'japanese' => 'iso-2022-jp', + 'ja' => 'euc-jp', + 'japanese' => 'euc-jp', 'en' => 'us-ascii', 'english' => 'us-ascii', @@ -239,6 +239,8 @@ sub language_to_internal_charset { my ($self, $language) = @_; + $language = 'ja'; + return( $internal_charset_map{ lc($language) } || '' ); } @@ -251,6 +253,8 @@ sub language_to_message_charset { my ($self, $language) = @_; + $language = 'ja'; + return( $message_charset_map{ lc($language) } || '' ); } @@ -263,6 +267,8 @@ sub message_charset_to_language { my ($self, $charset) = @_; + $charset = 'iso-2022-jp'; + return( $rev_message_charset_map{ lc($charset) } || '' ); } |