[PerlWikiBot] SF.net SVN: perlwikibot:[78] trunk/no-interwiki/prepare_noiw_list.pl

[<am...@us...>]

Revision: 78
          http://perlwikibot.svn.sourceforge.net/perlwikibot/?rev=78&view=rev
Author:   amire80
Date:     2009-09-26 10:42:51 +0000 (Sat, 26 Sep 2009)

Log Message:
-----------
Less logging, redirects are supposed to be stable.

Modified Paths:
--------------
    trunk/no-interwiki/prepare_noiw_list.pl

Modified: trunk/no-interwiki/prepare_noiw_list.pl
===================================================================
--- trunk/no-interwiki/prepare_noiw_list.pl	2009-09-26 10:41:09 UTC (rev 77)
+++ trunk/no-interwiki/prepare_noiw_list.pl	2009-09-26 10:42:51 UTC (rev 78)
@@ -71,7 +71,7 @@
 # Initialize logger
 Log::Log4perl->easy_init(
     {
-        level  => $DEBUG,                 # print everything
+        level  => $INFO,                  # print everything
         file   => ':utf8>outtest.log',    # utf is important
         layout => '%m%n',                 # No need to print the date
     }
@@ -425,7 +425,7 @@
 
         if (my $redirect_type = is_redirect($page_ref)) {
             $statistics{"redirect - $redirect_type"}++;
-            INFO("\n$page_title - $redirect_type redirect");
+            DEBUG("\n$page_title - $redirect_type redirect");
             next PAGE;
         }
 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.