feedlog.pl: Fix annoying logging error.

warn() output to errlog was not activated by '-d' debug
switch, but on by default and just deactivated by '-d'.

Signed-off-by: Thomas Hochstein <thh@inter.net>

diff --git a/feedlog.pl b/feedlog.pl
index 7986249..61311ac 100755 (executable)
--- a/feedlog.pl
+++ b/feedlog.pl
@@ -77,7 +77,7 @@ while (<>) {
   };
   $DBQuery->finish;
   
   };
   $DBQuery->finish;
   

-  warn sprintf("-----\nDay: %s\nDate: %s\nMID: %s\nTS: %s\nToken: %s\nSize: %s\nPeer: %s\nPath: %s\nNewsgroups: %s\nHeaders: %s\n",$Day, $Date, $Mid, $Timestamp, $Token, $Size, $Peer, $Path, $Newsgroups, $Headers) if !$Options{'d'};
+  warn sprintf("-----\nDay: %s\nDate: %s\nMID: %s\nTS: %s\nToken: %s\nSize: %s\nPeer: %s\nPath: %s\nNewsgroups: %s\nHeaders: %s\n",$Day, $Date, $Mid, $Timestamp, $Token, $Size, $Peer, $Path, $Newsgroups, $Headers) if $Options{'d'};

 }
 
 ### close handles
 }
 
 ### close handles