diff options
| author | fukachan <fukachan> | 2002-10-03 22:11:12 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-10-03 22:11:12 +0000 |
| commit | 5f256d94faae86a175e70df681ed499ed3d3ed03 (patch) | |
| tree | 2d1922b08c16acfb78ca501eb82eea39fdd9d240 /fml/lib | |
| parent | fb01d4f6c58a858dbe216807ae75d56879d180fc (diff) | |
| download | fml8-5f256d94faae86a175e70df681ed499ed3d3ed03.tar.gz fml8-5f256d94faae86a175e70df681ed499ed3d3ed03.tar.bz2 fml8-5f256d94faae86a175e70df681ed499ed3d3ed03.zip | |
add prototype for $use_article_non_mime_filter
Diffstat (limited to 'fml/lib')
| -rw-r--r-- | fml/lib/FML/Filter.pm | 19 |
1 files changed, 18 insertions, 1 deletions
diff --git a/fml/lib/FML/Filter.pm b/fml/lib/FML/Filter.pm index aae8f112..f3b50a89 100644 --- a/fml/lib/FML/Filter.pm +++ b/fml/lib/FML/Filter.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: Filter.pm,v 1.12 2002/09/29 12:43:23 fukachan Exp $ +# $FML: Filter.pm,v 1.13 2002/09/30 11:00:53 fukachan Exp $ # package FML::Filter; @@ -130,6 +130,23 @@ sub _apply_article_non_mime_filter my ($self, $curproc, $args, $mesg) = @_; my $config = $curproc->config(); + if ($config->yes( 'use_article_non_mime_filter' )) { + my $rules = + $config->get_as_array_ref('article_none_mime_filter_rules'); + + RULE: + for my $rule (@$rules) { + if ($rule eq 'permit') { + return 0; + } + + # XXX implement this! + if ($rule eq 'reject') { + ; + } + } + } + return 0; } |