diff options
| author | Ken'ichi Fukamachi <fukachan@fml.org> | 2018-09-04 18:22:41 +0900 |
|---|---|---|
| committer | Ken'ichi Fukamachi <fukachan@fml.org> | 2018-09-08 12:49:20 +0900 |
| commit | 3c7c5ca2e975a37a7ace0042b8d0991dabb95812 (patch) | |
| tree | 668b48d6fef0f6984300d220d6288fcf5e2fbf1a | |
| parent | 699772a3b8d01460308bf58593f46e92f253628e (diff) | |
| download | fml8-3c7c5ca2e975a37a7ace0042b8d0991dabb95812.tar.gz fml8-3c7c5ca2e975a37a7ace0042b8d0991dabb95812.tar.bz2 fml8-3c7c5ca2e975a37a7ace0042b8d0991dabb95812.zip | |
rewrite_article_subject_tag() switched to use Mail::Message::Encode::Perl.
| -rw-r--r-- | fml/lib/FML/Header.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/fml/lib/FML/Header.pm b/fml/lib/FML/Header.pm index 28fd14a9..4b3fef9d 100644 --- a/fml/lib/FML/Header.pm +++ b/fml/lib/FML/Header.pm @@ -467,7 +467,7 @@ sub rewrite_article_subject_tag my $sbj = new Mail::Message::Subject $str; # mime decode - $sbj->mime_decode(); + $sbj->mime_header_decode(); # de-tag and cut off Re: Re: Re: ... (duplicated reply tag). $sbj->delete_dup_reply_tag() if $sbj->has_reply_tag(); @@ -482,7 +482,7 @@ sub rewrite_article_subject_tag $sbj->set($new_sbj); # mime encode and replace subject field. - $sbj->mime_encode(); + $sbj->mime_header_encode(); $header->replace('Subject', $sbj->as_str()); } |