- From: Ville Skytta via cvs-syncmail <cvsmail@w3.org>
- Date: Mon, 23 Nov 2009 22:32:51 +0000
- To: www-validator-cvs@w3.org
Update of /sources/public/validator/httpd/cgi-bin
In directory hutz:/tmp/cvs-serv14017/httpd/cgi-bin
Modified Files:
check
Log Message:
Trivial cleanups.
Index: check
===================================================================
RCS file: /sources/public/validator/httpd/cgi-bin/check,v
retrieving revision 1.721
retrieving revision 1.722
diff -u -d -r1.721 -r1.722
--- check 23 Nov 2009 22:24:15 -0000 1.721
+++ check 23 Nov 2009 22:32:49 -0000 1.722
@@ -1509,10 +1509,8 @@
)
{
- my $default_doctype = (
- &is_xml($File) ? $File->{"Default DOCTYPE"}->{"XHTML"} :
- $File->{"Default DOCTYPE"}->{"HTML"}
- );
+ my $default_doctype =
+ $File->{"Default DOCTYPE"}->{&is_xml($File) ? "XHTML" : "HTML"};
$T->param(file_version => "$default_doctype");
}
else {
@@ -3424,10 +3422,7 @@
# No DOCTYPE found! We are falling back to vanilla DTD
if ($err->{msg} =~ m(prolog can\'t be omitted)) {
if (lc($File->{Root}) eq 'html') {
- my $dtd = (
- $is_xml ? $File->{"Default DOCTYPE"}->{"XHTML"} :
- $File->{"Default DOCTYPE"}->{"HTML"}
- );
+ my $dtd = $File->{"Default DOCTYPE"}->{$is_xml ? "XHTML" : "HTML"};
W3C::Validator::MarkupValidator::add_warning('W09',
{W09_dtd => $dtd});
}
Received on Monday, 23 November 2009 22:33:00 UTC