diff options
| author | fukachan <fukachan> | 2001-02-19 01:58:10 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-02-19 01:58:10 +0000 |
| commit | a5aacf2828be0b0ff38ba19f8a3d84d4073ce8ca (patch) | |
| tree | dadf54a0a22eca93e375a5ec15759080b62dc39b /fml | |
| parent | 92c65006fb5138a24297ffcc43084f5cb1d3f2ea (diff) | |
| download | fml8-a5aacf2828be0b0ff38ba19f8a3d84d4073ce8ca.tar.gz fml8-a5aacf2828be0b0ff38ba19f8a3d84d4073ce8ca.tar.bz2 fml8-a5aacf2828be0b0ff38ba19f8a3d84d4073ce8ca.zip | |
$header->delete_unsafe_header_fields() which removes
$unsafe_header_fields e.g. Return-Receipt-To:
Diffstat (limited to 'fml')
| -rw-r--r-- | fml/etc/default_config.cf.ja | 5 | ||||
| -rw-r--r-- | fml/etc/defaults/header.cf.ja | 5 | ||||
| -rw-r--r-- | fml/lib/FML/Header.pm | 8 |
3 files changed, 16 insertions, 2 deletions
diff --git a/fml/etc/default_config.cf.ja b/fml/etc/default_config.cf.ja index 278f1e28..b9bf05a1 100644 --- a/fml/etc/default_config.cf.ja +++ b/fml/etc/default_config.cf.ja @@ -116,7 +116,8 @@ header_check_rules = validate_message_id # もちろん”記事”に対してのものだ（自明？） # article_header_rewrite_rules とかの方がよいか？ # XXX: The action to cut off "Re:" is default. need not specified. -article_header_rewrite_rules = rewrite_subject_tag +article_header_rewrite_rules = delete_unsafe_header_fields + rewrite_subject_tag rewrite_reply_to add_software_info add_fml_ml_name @@ -129,6 +130,8 @@ article_header_rewrite_rules = rewrite_subject_tag digest_header_rewrite_rules = add_software_info add_rfc2369 +# あぶないタグ +unsafe_header_fields = Return-Receipt-To # Subject: につけるタグの制御 subject_tag_name = $ml_name diff --git a/fml/etc/defaults/header.cf.ja b/fml/etc/defaults/header.cf.ja index c7c69dc7..9b791d9e 100644 --- a/fml/etc/defaults/header.cf.ja +++ b/fml/etc/defaults/header.cf.ja @@ -12,7 +12,8 @@ header_check_rules = validate_message_id # もちろん”記事”に対してのものだ（自明？） # article_header_rewrite_rules とかの方がよいか？ # XXX: The action to cut off "Re:" is default. need not specified. -article_header_rewrite_rules = rewrite_subject_tag +article_header_rewrite_rules = delete_unsafe_header_fields + rewrite_subject_tag rewrite_reply_to add_software_info add_fml_ml_name @@ -25,6 +26,8 @@ article_header_rewrite_rules = rewrite_subject_tag digest_header_rewrite_rules = add_software_info add_rfc2369 +# あぶないタグ +unsafe_header_fields = Return-Receipt-To # Subject: につけるタグの制御 subject_tag_name = $ml_name diff --git a/fml/lib/FML/Header.pm b/fml/lib/FML/Header.pm index 3b4afe6b..a8087601 100644 --- a/fml/lib/FML/Header.pm +++ b/fml/lib/FML/Header.pm @@ -178,6 +178,14 @@ sub remove_subject_tag_like_string } +sub delete_unsafe_header_fields +{ + my ($header, $config, $args) = @_; + my (@fields) = split(/\s+/, $config->{ unsafe_header_fields }); + for (@fields) { $header->delete($_);} +} + + =head1 SEE ALSO L<Mail::Address> |