diff options
author | link <link@localhost> | 2002-11-03 02:22:07 +0000 |
---|---|---|
committer | link <link@localhost> | 2002-11-03 02:22:07 +0000 |
commit | 73cf65547e160e00eeb170a9cd4df14b13c2c0a6 (patch) | |
tree | 79de35102a71bd18d36754fd918a1f4b6b85a9a3 | |
parent | 274bea23cfd58121fd95d43605d9ed2d41071b3b (diff) | |
download | markup-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-x | httpd/cgi-bin/check | 9 |
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; } |