You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@spamassassin.apache.org by qu...@apache.org on 2005/05/01 06:51:09 UTC
svn commit: r165459 -
/spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
Author: quinlan
Date: Sat Apr 30 21:51:08 2005
New Revision: 165459
URL: http://svn.apache.org/viewcvs?rev=165459&view=rev
Log:
only warn() on this when linting since it's a configuration error
Modified:
spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
Modified: spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
URL: http://svn.apache.org/viewcvs/spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm?rev=165459&r1=165458&r2=165459&view=diff
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm Sat Apr 30 21:51:08 2005
@@ -2319,8 +2319,15 @@
my %metas = map { $_ => 1 } @metas; # keep a small cache for fast lookups
foreach $rulename (@metas) {
$self->{rule_errors}++; # flag to --lint that there was an error ...
- warn("rules: excluding meta test $rulename; unsolved meta dependencies: " .
- join(", ", grep($metas{$_}, @{ $rule_deps{$rulename} })));
+ my $msg =
+ "rules: excluding meta test $rulename, unsolved meta dependencies: " .
+ join(", ", grep($metas{$_}, @{ $rule_deps{$rulename} }));
+ if ($self->{main}->{lint_rules}) {
+ warn $msg."\n";
+ }
+ else {
+ info($msg);
+ }
}
if (defined &{'_meta_tests_'.$clean_priority}) {