r1016@llin: dpavlin | 2006-09-26 12:03:11 +0200

 make it less chatty

git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@711 07558da8-63fa-0310-ba24-9fe276d99e06

diff --git a/conf/log.conf b/conf/log.conf
index 69c0c83..c796592 100644 (file)
--- a/conf/log.conf
+++ b/conf/log.conf
@@ -7,7 +7,7 @@ log4perl.rootLogger=INFO, LOG, SCREEN
 
 # you can specify methods from WebPAC here also!
 #log4perl.logger.main=INFO
-log4perl.logger.main=DEBUG
+#log4perl.logger.main=DEBUG
 
 #log4perl.logger.WebPAC=DEBUG
 

diff --git a/lib/WebPAC/Normalize.pm b/lib/WebPAC/Normalize.pm
index 0d65107..2bbdc37 100644 (file)
--- a/lib/WebPAC/Normalize.pm
+++ b/lib/WebPAC/Normalize.pm
@@ -977,7 +977,7 @@ sub save_into_lookup {
        my $mfn = $rec->{'000'}->[0] || die "mfn not defined or zero";
        foreach my $v ( $coderef->() ) {
                $lookup->{$k}->{$v}->{$mfn}++;
-               warn "# lookup $k $v $mfn saved\n";     # if ($debug > 1);
+               warn "# lookup $k $v $mfn saved\n" if ($debug > 1);
        }
 }