perl/modules/W3C/LogValidator/lib/W3C/LogValidator Basic.pm,1.17,1.18 CSSValidator.pm,1.22,1.23 HTMLValidator.pm,1.28,1.29

Update of /sources/public/perl/modules/W3C/LogValidator/lib/W3C/LogValidator
In directory hutz:/tmp/cvs-serv19895

Modified Files:
	Basic.pm CSSValidator.pm HTMLValidator.pm 
Log Message:
making the notice of records ignored because of HTTP-code appear only in debug (very verbose) mode

Index: HTMLValidator.pm
===================================================================
RCS file: /sources/public/perl/modules/W3C/LogValidator/lib/W3C/LogValidator/HTMLValidator.pm,v
retrieving revision 1.28
retrieving revision 1.29
diff -u -d -r1.28 -r1.29
--- HTMLValidator.pm	14 Nov 2008 23:15:10 -0000	1.28
+++ HTMLValidator.pm	18 Nov 2008 16:48:56 -0000	1.29
@@ -204,7 +204,7 @@
                   if (($HTTPcodes{$uri} ne "200")  and ($HTTPcodes{$uri} =~ /\d+/))
                   {
                     $match = 0;
-                    if ($verbose > 1) { 
+                    if ($verbose > 2) { 
                       print "$uri returned code $HTTPcodes{$uri}, ignoring \n"; 
                     }
                   }

Index: Basic.pm
===================================================================
RCS file: /sources/public/perl/modules/W3C/LogValidator/lib/W3C/LogValidator/Basic.pm,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -d -r1.17 -r1.18
--- Basic.pm	14 Nov 2008 23:15:38 -0000	1.17
+++ Basic.pm	18 Nov 2008 16:48:56 -0000	1.18
@@ -158,7 +158,7 @@
 		    push @result_tmp, "$uri";
 		    push @result, [@result_tmp];
 		}
-		elsif ((defined $HTTPcodes{$uri}) and ($verbose > 1)) { 
+		elsif ((defined $HTTPcodes{$uri}) and ($verbose > 2)) { 
 		    print "$uri returned code $HTTPcodes{$uri}, ignoring \n"; 
 		}
 	}

Index: CSSValidator.pm
===================================================================
RCS file: /sources/public/perl/modules/W3C/LogValidator/lib/W3C/LogValidator/CSSValidator.pm,v
retrieving revision 1.22
retrieving revision 1.23
diff -u -d -r1.22 -r1.23
--- CSSValidator.pm	14 Nov 2008 23:15:11 -0000	1.22
+++ CSSValidator.pm	18 Nov 2008 16:48:56 -0000	1.23
@@ -190,7 +190,7 @@
                   if (($HTTPcodes{$uri} ne "200")  and ($HTTPcodes{$uri} =~ /\d+/))
                   {
                     $match = 0;
-                		if ($verbose > 1) { 
+                		if ($verbose > 2) { 
                 		    print "$uri returned code $HTTPcodes{$uri}, ignoring \n"; 
                 		}
                   }

Received on Tuesday, 18 November 2008 16:49:08 UTC