- From: Ville Skytta <ville@hutz.w3.org>
- Date: Sun, 16 May 2004 21:58:43 +0000
- To: www-validator-cvs@w3.org
Update of /sources/public/perl/modules/W3C/LinkChecker/bin
In directory hutz:/tmp/cvs-serv7960
Modified Files:
checklink
Log Message:
HTML-escape given URI in the "you cannot check such a URI" message.
Index: checklink
===================================================================
RCS file: /sources/public/perl/modules/W3C/LinkChecker/bin/checklink,v
retrieving revision 3.43
retrieving revision 3.44
diff -u -d -r3.43 -r3.44
--- checklink 10 May 2004 18:41:28 -0000 3.43
+++ checklink 16 May 2004 21:58:40 -0000 3.44
@@ -2131,9 +2131,10 @@
{
my ($uri) = @_;
&html_header($uri);
- print "<h2>Forbidden</h2>
-<p>You cannot check such a URI (<code>$uri</code>).</p>
-";
+ printf(<<'EOF', &encode($uri));
+<h2>Forbidden</h2>
+<p>You cannot check such a URI (<code>%s</code>).</p>
+EOF
&html_footer();
exit;
}
Received on Sunday, 16 May 2004 18:00:26 UTC