summaryrefslogtreecommitdiff
path: root/fml/lib/FML/Header
diff options
context:
space:
mode:
authorfukachan <fukachan>2005-08-19 11:21:14 +0000
committerfukachan <fukachan>2005-08-19 11:21:14 +0000
commit6413baf2b0ec514dba768d01e7853b8b4d02000b (patch)
tree6fc8dc2be35751213159fce7e160da8bbe14c390 /fml/lib/FML/Header
parent792b657553a53aa0e5f6a1e0fda1a841e4b835cf (diff)
downloadfml8-6413baf2b0ec514dba768d01e7853b8b4d02000b.tar.gz
fml8-6413baf2b0ec514dba768d01e7853b8b4d02000b.tar.bz2
fml8-6413baf2b0ec514dba768d01e7853b8b4d02000b.zip
bug fixed (forgotten import of module ;-)
Diffstat (limited to 'fml/lib/FML/Header')
-rw-r--r--fml/lib/FML/Header/Subject.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/fml/lib/FML/Header/Subject.pm b/fml/lib/FML/Header/Subject.pm
index 1d3aae1a..e473f656 100644
--- a/fml/lib/FML/Header/Subject.pm
+++ b/fml/lib/FML/Header/Subject.pm
@@ -4,7 +4,7 @@
# All rights reserved. This program is free software; you can
# redistribute it and/or modify it under the same terms as Perl itself.
#
-# $FML: Subject.pm,v 1.48 2005/05/26 10:20:05 fukachan Exp $
+# $FML: Subject.pm,v 1.49 2005/08/18 10:30:09 fukachan Exp $
#
package FML::Header::Subject;
@@ -128,6 +128,8 @@ sub decode
}
if ($subject =~ /=\?([-\w\d]+)\?/i) {
+ use Mail::Message::Charset;
+ my $mc = new Mail::Message::Charset;
my $lang = $mc->message_charset_to_language($1);
$in_code = $mc->language_to_message_charset($lang) || '';
$out_code = $mc->language_to_internal_charset($lang) || '';