diff options
| author | fukachan <fukachan> | 2001-11-26 08:41:36 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-11-26 08:41:36 +0000 |
| commit | 7a8d7954e346bccd000ec16309e3378125bc4451 (patch) | |
| tree | 0e1a57f94878b49a11eacca57eb1cf146f5d8df9 /fml/lib/FML/Header | |
| parent | 70a185a9f99058dec82340f186dfabcf98af2a3c (diff) | |
| download | fml8-7a8d7954e346bccd000ec16309e3378125bc4451.tar.gz fml8-7a8d7954e346bccd000ec16309e3378125bc4451.tar.bz2 fml8-7a8d7954e346bccd000ec16309e3378125bc4451.zip | |
FML::Language -> Mail::Message::Language
Diffstat (limited to 'fml/lib/FML/Header')
| -rw-r--r-- | fml/lib/FML/Header/Subject.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/fml/lib/FML/Header/Subject.pm b/fml/lib/FML/Header/Subject.pm index 9d217d9a..10d42d35 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.19 2001/07/31 14:19:41 fukachan Exp $ +# $FML: Subject.pm,v 1.20 2001/10/08 23:28:27 fukachan Exp $ # package FML::Header::Subject; @@ -164,10 +164,10 @@ sub is_reply return 1 if $subject =~ /^\s*Re:/i; - my $pkg = 'FML::Language::Japanese::Subject'; + my $pkg = 'Mail::Message::Language::Japanese::Subject'; eval qq{ require $pkg; $pkg->import();}; unless ($@) { - return 1 if &FML::Language::Japanese::Subject::is_reply($subject); + return 1 if &Mail::Message::Language::Japanese::Subject::is_reply($subject); }; return 0; @@ -183,11 +183,11 @@ sub _cut_off_reply { my ($self, $r_subject) = @_; - my $pkg = 'FML::Language::Japanese::Subject'; + my $pkg = 'Mail::Message::Language::Japanese::Subject'; eval qq{ require $pkg; $pkg->import();}; unless ($@) { $$r_subject = - &FML::Language::Japanese::Subject::cut_off_reply_tag($$r_subject); + &Mail::Message::Language::Japanese::Subject::cut_off_reply_tag($$r_subject); } else { Log($@); |