You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@spamassassin.apache.org by fe...@apache.org on 2005/05/14 22:01:12 UTC

svn commit: r170164 - /spamassassin/trunk/lib/Mail/SpamAssassin/Logger.pm

Author: felicity
Date: Sat May 14 13:01:11 2005
New Revision: 170164

URL: http://svn.apache.org/viewcvs?rev=170164&view=rev
Log:
check for debug facility earlier in Logger::_log() so we can drop out faster if we're not actually going to do anything

Modified:
    spamassassin/trunk/lib/Mail/SpamAssassin/Logger.pm

Modified: spamassassin/trunk/lib/Mail/SpamAssassin/Logger.pm
URL: http://svn.apache.org/viewcvs/spamassassin/trunk/lib/Mail/SpamAssassin/Logger.pm?rev=170164&r1=170163&r2=170164&view=diff
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/Logger.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/Logger.pm Sat May 14 13:01:11 2005
@@ -179,19 +179,19 @@
 sub _log {
   my ($level, $message) = @_;
 
+  # only debug specific facilities
+  # log all info, warn, and error messages
+  if ($level eq "dbg") {
+    return unless ($LOG_SA{facility}->{all} ||
+		   $LOG_SA{facility}->{$facility});
+  }
+
   my $facility = "generic";
   my $whitespace = " ";
   if ($message =~ /^(\S+?):(\s*)(.*)/s) {
     $facility = $1;
     $whitespace = $2 if $2;
     $message = $3;
-  }
-
-  # only debug specific facilities
-  # log all info, warn, and error messages
-  if ($level eq "dbg") {
-    return unless ($LOG_SA{facility}->{all} ||
-		   $LOG_SA{facility}->{$facility});
   }
 
   $message =~ s/\n+$//s;