perl/modules/W3C/LogValidator/lib/W3C/LogValidator Basic.pm,1.16,1.17

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

Modified Files:
	Basic.pm 
Log Message:
code doc

Index: Basic.pm
===================================================================
RCS file: /sources/public/perl/modules/W3C/LogValidator/lib/W3C/LogValidator/Basic.pm,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -d -r1.16 -r1.17
--- Basic.pm	4 Sep 2007 04:39:17 -0000	1.16
+++ Basic.pm	14 Nov 2008 23:15:38 -0000	1.17
@@ -142,8 +142,7 @@
 		chomp ($uri);
 		my @result_tmp;
 		if (!defined $HTTPcodes{$uri})
-#(!defined $HTTPcodes{$uri}) or ($HTTPcodes{$uri} eq "") or ( $HTTPcodes{$uri} =~ /^[2-3]/))
-		{ # This module should ignore requests that resulted in 4XX and 5XX codes
+		{ # if no HTTP code present, assume it's a 200
 		    $census++;
 		    push @result_tmp, "$census";
 		    push @result_tmp, "$hits{$uri}";

Received on Friday, 14 November 2008 23:15:49 UTC