- From: Mercurial notifier <nobody@w3.org>
- Date: Thu, 05 Aug 2010 14:47:14 +0000
- To: link-checker updates <www-validator-cvs@w3.org>
changeset: 232:dff1fb9fb282
user: ville
date: Thu May 01 07:56:13 2008 +0000
files: Makefile.PL bin/checklink docs/checklink.html
description:
Drop old URI workarounds, require >= 1.31.
diff -r f9f3d713a86f -r dff1fb9fb282 Makefile.PL
--- a/Makefile.PL Mon Apr 21 08:00:30 2008 +0000
+++ b/Makefile.PL Thu May 01 07:56:13 2008 +0000
@@ -14,7 +14,7 @@
Net::IP => 0, # Optional, see the docs.
Term::ReadKey => 2.00,
Time::HiRes => 0,
- URI => 0,
+ URI => 1.31,
# For the test suite:
Test::More => 0,
File::Spec => 0,
diff -r f9f3d713a86f -r dff1fb9fb282 bin/checklink
--- a/bin/checklink Mon Apr 21 08:00:30 2008 +0000
+++ b/bin/checklink Thu May 01 07:56:13 2008 +0000
@@ -5,7 +5,7 @@
# (c) 1999-2008 World Wide Web Consortium
# based on Renaud Bruyeron's checklink.pl
#
-# $Id: checklink,v 4.102 2008-04-21 08:00:30 ville Exp $
+# $Id: checklink,v 4.103 2008-05-01 07:56:13 ville Exp $
#
# This program is licensed under the W3C(r) Software License:
# http://www.w3.org/Consortium/Legal/copyright-software
@@ -183,7 +183,7 @@
use HTTP::Request qw();
use HTTP::Response 1.50 qw(); # >= 1.50 for decoded_content()
use Time::HiRes qw();
-use URI qw();
+use URI 1.31 qw(); # >= 1.31 for sip: abs/rel
use URI::Escape qw();
use URI::file qw();
# @@@ Needs also W3C::UserAgent but can't use() it here.
@@ -242,7 +242,7 @@
$PROGRAM = 'W3C-checklink';
$VERSION = '4.3';
$REVISION = sprintf('version %s (c) 1999-2008 W3C', $VERSION);
- my ($cvsver) = q$Revision: 4.102 $ =~ /(\d+[\d\.]*\.\d+)/;
+ my ($cvsver) = q$Revision: 4.103 $ =~ /(\d+[\d\.]*\.\d+)/;
$AGENT = sprintf('%s/%s [%s] %s',
$PROGRAM, $VERSION, $cvsver, LWP::RobotUA->_agent());
@@ -899,10 +899,6 @@
foreach my $link (keys %{$p->{Links}}) {
my $link_uri = URI->new($link);
my $abs_link_uri = URI->new_abs($link_uri, $base);
-
- # Work around a bug in URI::sip(s) (URI 1.22 - 1.30).
- $abs_link_uri = $link_uri
- if (!defined($abs_link_uri) && $link_uri->scheme() =~ /^sips?$/);
if ($Opts{Masquerade}) {
if ($abs_link_uri =~ m|^\Q$Opts{Masquerade_From}\E|) {
diff -r f9f3d713a86f -r dff1fb9fb282 docs/checklink.html
--- a/docs/checklink.html Mon Apr 21 08:00:30 2008 +0000
+++ b/docs/checklink.html Thu May 01 07:56:13 2008 +0000
@@ -6,7 +6,7 @@
<title>W3C Link Checker Documentation</title>
<link rev="made" href="mailto:www-validator@w3.org" />
<style type="text/css" media="all">@import "linkchecker.css";</style>
- <meta name="revision" content="$Id: checklink.html,v 1.44 2008-04-21 07:26:33 ville Exp $" />
+ <meta name="revision" content="$Id: checklink.html,v 1.45 2008-05-01 07:56:13 ville Exp $" />
</head>
<body>
@@ -146,7 +146,7 @@
<li><a href="http://search.cpan.org/dist/Net-IP/">Net-IP</a> (optional but recommended; required for restricting access to <a href="http://www.ietf.org/rfc/rfc1918.txt">private IP addresses</a>)</li>
<li><a href="http://search.cpan.org/dist/TermReadKey/">TermReadKey</a> (optional but recommended; required only in command line mode for password input)</li>
<li><a href="http://search.cpan.org/dist/Time-HiRes/">Time-HiRes</a></li>
- <li><a href="http://search.cpan.org/dist/URI/">URI</a></li>
+ <li><a href="http://search.cpan.org/dist/URI/">URI</a> (version 1.31 or newer)</li>
</ul>
</li>
<li>
@@ -302,7 +302,7 @@
alt="Valid XHTML 1.0!" /></a>
<a title="Send Feedback for the W3C Link Checker"
href="http://validator.w3.org/feedback.html">The W3C Validator Team</a><br />
- $Date: 2008-04-21 07:26:33 $
+ $Date: 2008-05-01 07:56:13 $
</address>
<p class="copyright">
<a rel="Copyright" href="http://www.w3.org/Consortium/Legal/ipr-notice#Copyright">Copyright</a> © 1994-2008
Received on Thursday, 5 August 2010 14:47:28 UTC