summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorlink <link@localhost>2002-11-03 02:22:07 +0000
committerlink <link@localhost>2002-11-03 02:22:07 +0000
commit73cf65547e160e00eeb170a9cd4df14b13c2c0a6 (patch)
tree79de35102a71bd18d36754fd918a1f4b6b85a9a3
parent274bea23cfd58121fd95d43605d9ed2d41071b3b (diff)
downloadmarkup-validator-73cf65547e160e00eeb170a9cd4df14b13c2c0a6.zip
markup-validator-73cf65547e160e00eeb170a9cd4df14b13c2c0a6.tar.gz
markup-validator-73cf65547e160e00eeb170a9cd4df14b13c2c0a6.tar.bz2
First-cut, naive, fix for the whitespace in DOCTYPE issue reported by
Bjoern Hoehrmann. Thanks Bjoern!
-rwxr-xr-xhttpd/cgi-bin/check9
1 files changed, 6 insertions, 3 deletions
diff --git a/httpd/cgi-bin/check b/httpd/cgi-bin/check
index ee51ddb..30f27d9 100755
--- a/httpd/cgi-bin/check
+++ b/httpd/cgi-bin/check
@@ -9,7 +9,7 @@
# This source code is available under the license at:
# http://www.w3.org/Consortium/Legal/copyright-software
#
-# $Id: check,v 1.282 2002-11-02 17:24:08 link Exp $
+# $Id: check,v 1.283 2002-11-03 02:22:07 link Exp $
#
# Disable buffering on STDOUT!
@@ -95,7 +95,7 @@ BEGIN {
#
# Strings
- $VERSION = q$Revision: 1.282 $;
+ $VERSION = q$Revision: 1.283 $;
$VERSION =~ s/Revision: ([\d\.]+) /$1/;
@@ -157,7 +157,7 @@ $File->{'Header'} = &prepSSI({
});
$File->{'Footer'} = &prepSSI({
File => $CFG->{'Footer'},
- Date => q$Date: 2002-11-02 17:24:08 $,
+ Date => q$Date: 2002-11-03 02:22:07 $,
});
#
@@ -1882,6 +1882,9 @@ sub preparse {
$p->parse(join "\n", @{$File->{Content}});
$File->{DOCTYPE} = '' unless defined $File->{DOCTYPE};
+ $File->{DOCTYPE} =~ s(^\s+){ }g;
+ $File->{DOCTYPE} =~ s(\s+$){ }g;
+ $File->{DOCTYPE} =~ s(\s+) { }g;
return $File;
}