W3C home > Mailing lists > Public > www-validator-cvs@w3.org > February 2009

perl/modules/W3C/LinkChecker/bin checklink,4.147,4.148

From: Ville Skytta via cvs-syncmail <cvsmail@w3.org>
Date: Thu, 19 Feb 2009 19:59:14 +0000
To: www-validator-cvs@w3.org
Message-Id: <E1LaF3C-0000Oq-Te@lionel-hutz.w3.org>
Update of /sources/public/perl/modules/W3C/LinkChecker/bin
In directory hutz:/tmp/cvs-serv1520/bin

Modified Files:
	checklink 
Log Message:
Require URI::file only in command line mode.

Index: checklink
===================================================================
RCS file: /sources/public/perl/modules/W3C/LinkChecker/bin/checklink,v
retrieving revision 4.147
retrieving revision 4.148
diff -u -d -r4.147 -r4.148
--- checklink	10 Feb 2009 20:56:26 -0000	4.147
+++ checklink	19 Feb 2009 19:59:12 -0000	4.148
@@ -203,7 +203,6 @@
 use Time::HiRes          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.
 
 use constant RC_ROBOTS_TXT          => -1;
@@ -450,6 +449,8 @@
   require Text::Wrap;
   Text::Wrap->import('wrap');
 
+  require URI::file;
+
   &usage(1) unless scalar(@ARGV);
 
   $Opts{_Self_URI} = 'http://validator.w3.org/checklink'; # For HTML output
Received on Thursday, 19 February 2009 19:59:27 GMT

This archive was generated by hypermail 2.2.0+W3C-0.50 : Thursday, 26 April 2012 12:55:08 GMT