- From: Ville Skytta via cvs-syncmail <cvsmail@w3.org>
- Date: Sun, 10 Feb 2008 11:59:13 +0000
- To: www-validator-cvs@w3.org
Update of /sources/public/perl/modules/W3C/LinkChecker/bin
In directory hutz:/tmp/cvs-serv16293
Modified Files:
checklink
Log Message:
Improve variable naming in parse_document().
Index: checklink
===================================================================
RCS file: /sources/public/perl/modules/W3C/LinkChecker/bin/checklink,v
retrieving revision 4.82
retrieving revision 4.83
diff -u -d -r4.82 -r4.83
--- checklink 10 Feb 2008 11:57:21 -0000 4.82
+++ checklink 10 Feb 2008 11:59:11 -0000 4.83
@@ -1310,7 +1310,7 @@
sub parse_document ($$$$$)
{
- my ($uri, $location, $response, $links, $rec_needs_links) = @_;
+ my ($uri, $base_uri, $response, $links, $rec_needs_links) = @_;
my $p;
@@ -1330,7 +1330,7 @@
my $start;
$p = W3C::LinkChecker->new();
- $p->{base} = $location;
+ $p->{base} = $base_uri;
if (! $Opts{Summary_Only}) {
$start = &get_timestamp();
print("Parsing...\n");
Received on Sunday, 10 February 2008 11:59:21 UTC