diff options
author | ot <ot@localhost> | 2005-05-09 05:51:33 +0000 |
---|---|---|
committer | ot <ot@localhost> | 2005-05-09 05:51:33 +0000 |
commit | e1da4fe0a7febb49d21f945f568f4c7463e22c7c (patch) | |
tree | d9664ef831b645178d00d4294259efa32b0d35c2 | |
parent | 95d5f76d9c275d288924f834e426e3139c59c900 (diff) | |
download | markup-validator-e1da4fe0a7febb49d21f945f568f4c7463e22c7c.zip markup-validator-e1da4fe0a7febb49d21f945f568f4c7463e22c7c.tar.gz markup-validator-e1da4fe0a7febb49d21f945f568f4c7463e22c7c.tar.bz2 |
Doctype detection should not expect only PUBLIC, SYSTEM + a system identifier
would also validate.
see also http://www.w3.org/Bugs/Public/show_bug.cgi?id=1184#c2
-rwxr-xr-x | httpd/cgi-bin/check | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/httpd/cgi-bin/check b/httpd/cgi-bin/check index eb5bdfe..0d0ba89 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.415 2005-04-28 06:13:22 ville Exp $ +# $Id: check,v 1.416 2005-05-09 05:51:33 ot Exp $ # # Disable buffering on STDOUT! @@ -220,7 +220,7 @@ Directory not readable (permission denied): @_r # # Strings - $VERSION = q$Revision: 1.415 $; + $VERSION = q$Revision: 1.416 $; $VERSION =~ s/Revision: ([\d\.]+) /$1/; # @@ -1735,7 +1735,7 @@ sub preparse_doctype { my $dtd = sub { return if $File->{Root}; - ($File->{Root}, $File->{DOCTYPE}) = shift =~ m(<!DOCTYPE\s+(\w+)\s+PUBLIC\s+(?:[\'\"])([^\"\']+)(?:[\"\']).*>)si; + ($File->{Root}, $File->{DOCTYPE}) = shift =~ m(<!DOCTYPE\s+(\w+)\s+(?:PUBLIC|SYSTEM)\s+(?:[\'\"])([^\"\']+)(?:[\"\']).*>)si; }; my $start = sub { |