Update of /
In directory
Modified Files:
check sendfeedback.pl
Log Message:
Trim trailing whitespace, NFC.
Index: sendfeedback.pl
RCS file: /,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
sendfeedback.pl15 Aug 2006 21:49:29 -00001.5
sendfeedback.pl15 Aug 2006 21:51:08 -00001.6
@@ -138,7 +138,7 @@
sub de_template_explanation {
# takes the error message template, and replace "template keywords" with real life keywords
my $explanation = shift;
- if ($explanation){
+ if ($explanation){
$explanation =~ s/\%1/X/;
$explanation =~ s/\%2/Y/;
$explanation =~ s/\%3/Z/;
Index: check
RCS file: /,v
retrieving revision 1.461
retrieving revision 1.462
diff -u -d -r1.461 -r1.462
check15 Aug 2006 21:49:29 -00001.461
check15 Aug 2006 21:51:08 -00001.462
@@ -3,8 +3,8 @@
# W3C Markup Validation Service
# A CGI script to retrieve and validate a markup file
#
-# Copyright 1995-2006 World Wide Web Consortium, (Massachusetts
-# Institute of Technology, European Research Consortium for Informatics
+# Copyright 1995-2006 World Wide Web Consortium, (Massachusetts
+# Institute of Technology, European Research Consortium for Informatics
# and Mathematics, Keio University). All Rights Reserved.
#
# written by Gerald <gerald (AT) w3 (DOT) org>
@@ -790,7 +790,7 @@
sub fin_template ($$) {
my $File = shift;
my $T = shift;
-
+
if (! $File->{Doctype} and ($File->{Version} eq 'unknown' or $File->{Version} eq 'SGML' or (!$File->{Version}))) {
# @@TD@@ we should try falling back on other version
@@ -847,7 +847,7 @@
} elsif (defined $File->{Tentative}) {
$T->param(is_tentative =TRUE);
}
-
+
my $thispage = self_url_file($File);
$T->param(file_thispage =$thispage);
}
@@ -1540,16 +1540,16 @@
my $CFG = shift;
my $fpi = $File->{DCTYPE};
my $mode = $CFG->{Types}->{$fpi}->{'Parse Mode'};
-
+
if (!exists $CFG->{Types}->{$fpi})
{
&add_warning('W08', {W08_mime =$File->{ContentType}})
if $File->{Mode} eq 'TBD';
return;
}
-
+
$mode = 'TBD' unless $mode eq 'SGML' or $mode eq 'XML';
-
+
if ($File->{Mode} ne 'TBD' and $mode ne $File->{Mode}) {
&add_warning('W07', {
W07_mime =$File->{ContentType},
@@ -1558,7 +1558,7 @@
});
return;
}
-
+
# $File->{Mode} eq 'TBD'
if ($mode eq 'SGML' or $mode eq 'XML') {
$File->{Mode} = $mode
@@ -1803,7 +1803,7 @@
$thispage .= ';sp=1' if $File->{}->{'Show Parsetree'};
$thispage .= ';noatt=1' if $File->{}->{'No Attributes'};
$thispage .= ';outline=1' if $File->{}->{''};
-
+
# These were not added by report_valid; perhaps they should be?
# $thispage .= ';verbose=1' if $File->{}->{'Verbose'};
# $thispage .= ';No200=1' if $File->{}->{'No200'};