- From: Olivier Thereaux via cvs-syncmail <cvsmail@w3.org>
- Date: Tue, 17 Jul 2007 04:15:34 +0000
- To: www-validator-cvs@w3.org
Update of /sources/public/perl/modules/W3C/LogValidator/lib/W3C In directory hutz:/tmp/cvs-serv32240 Modified Files: LogValidator.pm Log Message: Adding patch provided by Nalin Singapuri, taking into account the presence of full URIs in some log formats (e.g squid reverse proxy). Index: LogValidator.pm =================================================================== RCS file: /sources/public/perl/modules/W3C/LogValidator/lib/W3C/LogValidator.pm,v retrieving revision 1.19 retrieving revision 1.20 diff -u -d -r1.19 -r1.20 --- LogValidator.pm 22 Jun 2006 05:33:40 -0000 1.19 +++ LogValidator.pm 17 Jul 2007 04:15:31 -0000 1.20 @@ -330,7 +330,9 @@ { $tmprecord = $record_arry[6]; $tmprecord = $self->remove_duplicates($tmprecord); - $tmprecord = join ("",'http://',$config{LogProcessor}{ServerName},$tmprecord); + if( !( $tmprecord =~ m/^https?\:/ ) ) { + $tmprecord = join ("",'http://',$config{LogProcessor}{ServerName},$tmprecord); + } } #print "$tmprecord \n" if ($verbose > 2); return $tmprecord;
Received on Tuesday, 17 July 2007 04:15:36 UTC