diff options
| author | fukachan <fukachan> | 2004-07-23 13:16:30 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2004-07-23 13:16:30 +0000 |
| commit | 017265cfc701f6abcd99f52a0fa6eb9516fd510f (patch) | |
| tree | 971613cdfec2b93173ad88a8dfa579dc29ba5ac3 /fml/lib/Mail/Message/Subject.pm | |
| parent | 1359417a1475d1530200003dd4005954bff51c50 (diff) | |
| download | fml8-017265cfc701f6abcd99f52a0fa6eb9516fd510f.tar.gz fml8-017265cfc701f6abcd99f52a0fa6eb9516fd510f.tar.bz2 fml8-017265cfc701f6abcd99f52a0fa6eb9516fd510f.zip | |
fix comments (FNF)
Diffstat (limited to 'fml/lib/Mail/Message/Subject.pm')
| -rw-r--r-- | fml/lib/Mail/Message/Subject.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/fml/lib/Mail/Message/Subject.pm b/fml/lib/Mail/Message/Subject.pm index 2b2800b3..886ffd9e 100644 --- a/fml/lib/Mail/Message/Subject.pm +++ b/fml/lib/Mail/Message/Subject.pm @@ -2,7 +2,7 @@ # # Copyright (C) 2004 Ken'ichi Fukamachi # -# $FML: Subject.pm,v 1.3 2004/03/28 11:11:55 fukachan Exp $ +# $FML: Subject.pm,v 1.4 2004/06/23 00:05:38 fukachan Exp $ # package Mail::Message::Subject; @@ -66,7 +66,7 @@ sub delete_dup_reply_tag # XXX-TODO: care for not Japanese string! # XXX-TODO: call this module if $subject is Japanese or English. - # XXX-TODO: but what should we do when the code is not the two ? + # XXX-TODO: but what should we do when the code is not the two above ? if (1) { use Mail::Message::Language::Japanese::Subject; my $sbj = new Mail::Message::Language::Japanese::Subject; @@ -116,6 +116,7 @@ sub delete_tag my ($self, $tag) = @_; my $subject = $self->as_str(); + # XXX $subject SHOULD BE MIME DECODED ALREADY. # for example, ml_name = elena # if $tag has special regexp such as \U$ml_name\E or \L$ml_name\E if (defined $tag) { |