diff options
| author | fukachan <fukachan> | 2005-08-09 03:22:22 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2005-08-09 03:22:22 +0000 |
| commit | d64bfdfa7a7958b52adcb43531089b5dc812f964 (patch) | |
| tree | c71d9bd840cf604428281c4a9df494e2ef04ff90 /fml | |
| parent | 86077d7bf997e6dd1d67962fba8ec40707b8f012 (diff) | |
| download | fml8-d64bfdfa7a7958b52adcb43531089b5dc812f964.tar.gz fml8-d64bfdfa7a7958b52adcb43531089b5dc812f964.tar.bz2 fml8-d64bfdfa7a7958b52adcb43531089b5dc812f964.zip | |
FNF: rename read_filter_rule_from_file() -> read_filter_rule_file().
Diffstat (limited to 'fml')
| -rw-r--r-- | fml/lib/FML/Filter.pm | 4 | ||||
| -rw-r--r-- | fml/lib/FML/Filter/MimeComponent.pm | 6 |
2 files changed, 5 insertions, 5 deletions
diff --git a/fml/lib/FML/Filter.pm b/fml/lib/FML/Filter.pm index 473da3de..eb575833 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.44 2004/12/05 16:19:04 fukachan Exp $ +# $FML: Filter.pm,v 1.45 2005/05/27 01:48:49 fukachan Exp $ # package FML::Filter; @@ -278,7 +278,7 @@ sub _apply_article_mime_component_filter my $file = $config->get('article_mime_component_filter_rules'); if (-f $file) { - $obj->read_filter_rule_from_file($file); + $obj->read_filter_rule_file($file); $obj->mime_component_check($mesg); } else { diff --git a/fml/lib/FML/Filter/MimeComponent.pm b/fml/lib/FML/Filter/MimeComponent.pm index d16f35fe..d227759d 100644 --- a/fml/lib/FML/Filter/MimeComponent.pm +++ b/fml/lib/FML/Filter/MimeComponent.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: MimeComponent.pm,v 1.12 2004/07/23 12:41:12 fukachan Exp $ +# $FML: MimeComponent.pm,v 1.13 2005/05/26 10:20:03 fukachan Exp $ # package FML::Filter::MimeComponent; @@ -463,7 +463,7 @@ sub _temp_file_path # Arguments: OBJ($self) STR($file) # Side Effects: update filter rules. # Return Value: none -sub read_filter_rule_from_file +sub read_filter_rule_file { my ($self, $file) = @_; my ($whole_type, $type, $action); @@ -597,7 +597,7 @@ if ($0 eq __FILE__) { my $obj = new FML::Filter::MimeComponent; if (defined $opt->{ 'c' }) { my $file = $opt->{ 'c' }; - $obj->read_filter_rule_from_file($file); + $obj->read_filter_rule_file($file); } $obj->dump_filter_rules(); print STDERR "\n"; |