- From: Ville Skytta via cvs-syncmail <cvsmail@w3.org>
- Date: Sun, 10 Feb 2008 11:57:23 +0000
- To: www-validator-cvs@w3.org
Update of /sources/public/perl/modules/W3C/LinkChecker/bin
In directory hutz:/tmp/cvs-serv15821
Modified Files:
checklink
Log Message:
Trim whitespace, NFC.
Index: checklink
===================================================================
RCS file: /sources/public/perl/modules/W3C/LinkChecker/bin/checklink,v
retrieving revision 4.81
retrieving revision 4.82
diff -u -d -r4.81 -r4.82
--- checklink 9 Feb 2008 14:49:13 -0000 4.81
+++ checklink 10 Feb 2008 11:57:21 -0000 4.82
@@ -770,7 +770,7 @@
if ($Opts{HTML}) {
&html_header($uri, 0, $cookie) if $is_first;
&print_form($query) if $is_start;
-
+
print('<h2>');
}
@@ -854,10 +854,10 @@
&encode(sprintf($Cfg{Markup_Validator_URI}, $esc_uri)),
&encode(sprintf($Cfg{CSS_Validator_URI}, $esc_uri)),
&encode($Opts{_Self_URI}));
-
+
printf ('<h3 class="status_progress" id="status_progress%s">Status: <span></span></h3>', $result_anchor);
print("<pre class=\"progress\">\n");
-
+
}
}
@@ -941,7 +941,7 @@
print ' ' if ($Opts{HTML} && !$Opts{Command_Line});
} else {
printf('<script type="text/javascript">show_progress("Checking link %s", "status_progress%s");</script>' , $u, $result_anchor)
- if ($Opts{HTML} && !$Opts{Summary_Only});
+ if ($Opts{HTML} && !$Opts{Summary_Only});
&hprintf("Checking link %s\n", $u);
}
@@ -983,7 +983,7 @@
}
}
printf('<script type="text/javascript">show_progress("Done. Document processed in %ss.\n", "status_progress%s");</script>' , &time_diff($start, &get_timestamp()), $result_anchor)
- if ($Opts{HTML} && !$Opts{Summary_Only});
+ if ($Opts{HTML} && !$Opts{Summary_Only});
&hprintf("Processed in %ss.\n", &time_diff($start, &get_timestamp()))
unless $Opts{Summary_Only};
@@ -2239,9 +2239,8 @@
sub banner ($)
{
-
my $tagline ="Check links and anchors in Web pages or full Web sites";
-
+
printf(<<'EOF', $tagline);
<div id="banner"><h1 id="title"><a href="http://www.w3.org/" title="W3C"><img alt="W3C" id="logo" src="http://validator.w3.org/images/w3c.png" /></a>
<a href="checklink"><span>Link Checker</span></a></h1>
@@ -2272,8 +2271,9 @@
$icon_type = 'error';
}
return('<span class="err_type"><img src="http://validator.w3.org/images/info_icons/'.$icon_type.'.png" alt="'.$icon_type.'" /></span>');
-
+
}
+
sub bgcolor ($)
{
my ($code) = @_;
@@ -2368,7 +2368,7 @@
my $chk = ' checked="checked"';
$q->param('hide_type', 'all') unless $q->param('hide_type');
- my $requested_uri = &encode($q->param('uri') || '');
+ my $requested_uri = &encode($q->param('uri') || '');
my $sum = $q->param('summary') ? $chk : '';
my $red = $q->param('hide_redirects') ? $chk : '';
my $all = ($q->param('hide_type') ne 'dir') ? $chk : '';
Received on Sunday, 10 February 2008 11:57:32 UTC