W3C home > Mailing lists > Public > www-validator-cvs@w3.org > June 2004

perl/modules/W3C/LinkChecker/bin checklink,3.55,3.56

From: Ville Skytta <ville@dev.w3.org>
Date: Tue, 08 Jun 2004 19:23:12 +0000
To: www-validator-cvs@w3.org
Message-Id: <20040608192313.029884A846@hutz.w3.org>

Update of /sources/public/perl/modules/W3C/LinkChecker/bin
In directory hutz:/tmp/cvs-serv24060

Modified Files:
	checklink 
Log Message:
Avoid warning when no realm is given in WWW-Authenticate.

Index: checklink
===================================================================
RCS file: /sources/public/perl/modules/W3C/LinkChecker/bin/checklink,v
retrieving revision 3.55
retrieving revision 3.56
diff -u -d -r3.55 -r3.56
--- checklink	8 Jun 2004 17:15:02 -0000	3.55
+++ checklink	8 Jun 2004 19:23:10 -0000	3.56
@@ -1391,12 +1391,13 @@
   my $r = $_[0];
   $r->headers->www_authenticate =~ /Basic realm=\"([^\"]+)\"/;
   my $realm = $1;
+  $realm = '' unless defined($realm);
 
   if ($Opts{Command_Line}) {
     printf STDERR <<EOF, $r->request()->url(), $realm;
 
 Authentication is required for %s.
-The realm is %s.
+The realm is "%s".
 Use the -u and -p options to specify a username and password and the -d option
 to specify trusted domains.
 EOF
@@ -1412,7 +1413,7 @@
 <body>", $DocType, $Head);
     &banner(': 401 Authorization Required');
     printf("<p>
-  You need %s access to <a href=\"%s\">%s</a> to perform link checking.<br>
+  You need \"%s\" access to <a href=\"%s\">%s</a> to perform link checking.<br>
 ", &encode($realm), (&encode($r->request()->url())) x 2);
 
     if ($Opts{Trusted}) {
Received on Tuesday, 8 June 2004 15:23:12 UTC

This archive was generated by hypermail 2.4.0 : Friday, 17 January 2020 23:02:06 UTC