Index: share/templates/en_US/popup_doctype.tmpl
===================================================================
RCS file: /sources/public/validator/share/templates/en_US/popup_doctype.tmpl,v
retrieving revision 1.2
diff -u -r1.2 popup_doctype.tmpl
--- share/templates/en_US/popup_doctype.tmpl 13 Nov 2004 10:27:51 -0000 1.2
+++ share/templates/en_US/popup_doctype.tmpl 29 Mar 2005 03:08:54 -0000
@@ -1,14 +1,14 @@
zsh: 10242 exit 1 cvs diff -u
29/03 12:09 ot@navi ~/Sites/cvs/public/validator% cvs diff -u share/templates/en_US/popup_doctype.tmpl httpd/cgi-bin/check
Index: share/templates/en_US/popup_doctype.tmpl
===================================================================
RCS file: /sources/public/validator/share/templates/en_US/popup_doctype.tmpl,v
retrieving revision 1.2
diff -u -r1.2 popup_doctype.tmpl
--- share/templates/en_US/popup_doctype.tmpl 13 Nov 2004 10:27:51 -0000 1.2
+++ share/templates/en_US/popup_doctype.tmpl 29 Mar 2005 03:10:12 -0000
@@ -1,14 +1,14 @@
Index: httpd/cgi-bin/check
===================================================================
RCS file: /sources/public/validator/httpd/cgi-bin/check,v
retrieving revision 1.411
diff -u -r1.411 check
--- httpd/cgi-bin/check 25 Mar 2005 04:44:33 -0000 1.411
+++ httpd/cgi-bin/check 29 Mar 2005 03:10:13 -0000
@@ -838,6 +838,9 @@
} else {
&prep_template($File, $T);
+
+
+
if (! $File->{Doctype} and ($File->{Version} eq 'unknown' or $File->{Version} eq 'SGML')) {
$T->param(file_version => '(no Doctype found)');
}
@@ -930,6 +933,13 @@
$T->param(file_namespace => $File->{Namespace});
my @nss = map({uri => $_}, @{$File->{Namespaces}});
$T->param(file_namespaces => \@nss) if @nss;
+
+ if ($File->{Opt}->{DOCTYPE}) {
+ my $over_doctype_param = "override $File->{Opt}->{DOCTYPE}";
+ $T->param($over_doctype_param => TRUE);
+
+ }
+
}
#