- From: Ville Skytta via cvs-syncmail <cvsmail@w3.org>
- Date: Sun, 10 Feb 2008 13:20:13 +0000
- To: www-validator-cvs@w3.org
Update of /sources/public/perl/modules/W3C/LinkChecker/bin
In directory hutz:/tmp/cvs-serv3789
Modified Files:
checklink
Log Message:
->base() returns a URI, don't create another one.
Index: checklink
===================================================================
RCS file: /sources/public/perl/modules/W3C/LinkChecker/bin/checklink,v
retrieving revision 4.87
retrieving revision 4.88
diff -u -d -r4.87 -r4.88
--- checklink 10 Feb 2008 13:18:01 -0000 4.87
+++ checklink 10 Feb 2008 13:20:11 -0000 4.88
@@ -1082,7 +1082,7 @@
}
# What is the URI of the resource that we are processing by the way?
- my $base_uri = URI->new($response->base());
+ my $base_uri = $response->base();
my $request_uri = URI->new($response->request->url);
$response->{absolute_uri} = $request_uri->abs($base_uri);
Received on Sunday, 10 February 2008 13:20:21 UTC