- From: Olivier Thereaux via cvs-syncmail <cvsmail@w3.org>
- Date: Thu, 03 Jul 2008 19:48:06 +0000
- To: www-validator-cvs@w3.org
Update of /sources/public/perl/modules/W3C/LinkChecker/bin
In directory hutz:/tmp/cvs-serv4438
Modified Files:
checklink
Log Message:
removed unused vars - Patch courtesy of Michael Ernst
Index: checklink
===================================================================
RCS file: /sources/public/perl/modules/W3C/LinkChecker/bin/checklink,v
retrieving revision 4.110
retrieving revision 4.111
diff -u -d -r4.110 -r4.111
--- checklink 3 Jul 2008 19:46:35 -0000 4.110
+++ checklink 3 Jul 2008 19:48:04 -0000 4.111
@@ -1919,7 +1919,6 @@
my $whattodo;
my $redirect_too;
if ($todo) {
- my $currmsg = $currloc->{message} || '';
if ($u =~ m/^javascript:/) {
if ($Opts{HTML}) {
$whattodo =
@@ -2024,7 +2023,6 @@
# List of lines
$lines_list);
if ($#fragments >= 0) {
- my $fragment_direction = '';
printf("<dd>Broken fragments: <ul>\n");
}
} else {
Received on Thursday, 3 July 2008 19:48:41 UTC