diff options
| author | fukachan <fukachan> | 2002-09-24 15:02:29 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-09-24 15:02:29 +0000 |
| commit | d4fc0881250e96bfd056e0b7dd46db7d0943eafb (patch) | |
| tree | 128188ee64f4da54a09f9e84d93a7e86a4955ff9 /fml | |
| parent | 716212879045baef663f99be8d3c4fddcd2ee7c8 (diff) | |
| download | fml8-d4fc0881250e96bfd056e0b7dd46db7d0943eafb.tar.gz fml8-d4fc0881250e96bfd056e0b7dd46db7d0943eafb.tar.bz2 fml8-d4fc0881250e96bfd056e0b7dd46db7d0943eafb.zip | |
$article_header_filter_rules: append permit rule
Diffstat (limited to 'fml')
| -rw-r--r-- | fml/etc/default_config.cf.ja.in | 4 | ||||
| -rw-r--r-- | fml/etc/src/config.cf.ja/header.cf | 4 | ||||
| -rw-r--r-- | fml/lib/FML/Filter/HeaderCheck.pm | 7 |
3 files changed, 12 insertions, 3 deletions
diff --git a/fml/etc/default_config.cf.ja.in b/fml/etc/default_config.cf.ja.in index c3efc7b4..982694b7 100644 --- a/fml/etc/default_config.cf.ja.in +++ b/fml/etc/default_config.cf.ja.in @@ -611,11 +611,13 @@ objective_file = $ml_home_dir/objective use_article_header_filter = yes -# Descriptions: フィルタリングのルール +# Descriptions: フィルタリングのルール。 +# どのルールにもマッチしないなら、記事の投稿は認められる。 # History: # Value: # Examples: article_header_filter_rules = check_message_id + permit # Descriptions: ヘッダ情報を根拠にしたループチェックをするか？ diff --git a/fml/etc/src/config.cf.ja/header.cf b/fml/etc/src/config.cf.ja/header.cf index 2b0d1b56..b7982bc0 100644 --- a/fml/etc/src/config.cf.ja/header.cf +++ b/fml/etc/src/config.cf.ja/header.cf @@ -7,11 +7,13 @@ use_article_header_filter = yes -# Descriptions: フィルタリングのルール +# Descriptions: フィルタリングのルール。 +# どのルールにもマッチしないなら、記事の投稿は認められる。 # History: # Value: # Examples: article_header_filter_rules = check_message_id + permit # Descriptions: ヘッダ情報を根拠にしたループチェックをするか？ diff --git a/fml/lib/FML/Filter/HeaderCheck.pm b/fml/lib/FML/Filter/HeaderCheck.pm index 7ca32cd8..469d0305 100644 --- a/fml/lib/FML/Filter/HeaderCheck.pm +++ b/fml/lib/FML/Filter/HeaderCheck.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: HeaderCheck.pm,v 1.18 2002/09/11 23:18:12 fukachan Exp $ +# $FML: HeaderCheck.pm,v 1.19 2002/09/22 14:56:50 fukachan Exp $ # package FML::Filter::HeaderCheck; @@ -105,7 +105,12 @@ sub header_check my $rules = $self->{ _rules }; # apply $rule check for the header object $hdr + RULE: for my $rule (@$rules) { + if ($rule eq 'permit') { + last RULE; + } + eval q{ $self->$rule($hdr, $args); }; |