summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKen'ichi Fukamachi <fukachan@fml.org>2018-09-10 19:15:20 +0900
committerKen'ichi Fukamachi <fukachan@fml.org>2018-09-10 19:15:20 +0900
commit7dc3fe1a7ac71cb1907b2d02ae81f90a01f6fd87 (patch)
treed9ad25aa4ea27fcff57a9e7d285087e4f9db421c
parentde87e61e4cc621dd4d5cd7e711179fa36d6e2a66 (diff)
downloadfml8-7dc3fe1a7ac71cb1907b2d02ae81f90a01f6fd87.tar.gz
fml8-7dc3fe1a7ac71cb1907b2d02ae81f90a01f6fd87.tar.bz2
fml8-7dc3fe1a7ac71cb1907b2d02ae81f90a01f6fd87.zip
handle subject_tag with % (e.g. %d, %05d) or not correctly to avoid warning.
-rw-r--r--fml/lib/FML/Header.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/fml/lib/FML/Header.pm b/fml/lib/FML/Header.pm
index 5b8f6a0d..386f9a87 100644
--- a/fml/lib/FML/Header.pm
+++ b/fml/lib/FML/Header.pm
@@ -475,7 +475,7 @@ sub rewrite_article_subject_tag
$sbj->delete_dup_reply_tag() if $sbj->has_reply_tag();
# add(prepend) the rewrited tag with mime encoding.
- my $new_tag = sprintf($tag, $rw_args->{ id });
+ my $new_tag = $tag =~ /\%/ ? sprintf($tag, $rw_args->{ id }) : $tag;
my $new_sbj = sprintf("%s %s", $new_tag, $sbj->as_str());
# update object.