- From: Ville Skytta via cvs-syncmail <cvsmail@w3.org>
- Date: Sun, 03 May 2009 09:34:10 +0000
- To: www-validator-cvs@w3.org
Update of /sources/public/perl/modules/W3C/LinkChecker/bin
In directory hutz:/tmp/cvs-serv20999
Modified Files:
checklink
Log Message:
Treat masquerade targets that lack a scheme as file: URIs, absolutize relative paths.
Index: checklink
===================================================================
RCS file: /sources/public/perl/modules/W3C/LinkChecker/bin/checklink,v
retrieving revision 4.158
retrieving revision 4.159
diff -u -d -r4.158 -r4.159
--- checklink 19 Apr 2009 11:13:23 -0000 4.158
+++ checklink 3 May 2009 09:34:08 -0000 4.159
@@ -666,8 +666,10 @@
!defined($masq[1]) || $masq[1] !~ /\S/) {
usage(1, "Error: --masquerade takes two whitespace separated URIs.");
} else {
+ require URI::file;
$Opts{Masquerade_From} = $masq[0];
- $Opts{Masquerade_To} = $masq[1];
+ my $masq_to = URI->new($masq[1]);
+ $Opts{Masquerade_To} = $u->scheme() ? $u : URI::file->new_abs($masq[1]);
}
}
Received on Sunday, 3 May 2009 09:34:20 UTC