- From: Bjoern Hoehrmann via cvs-syncmail <cvsmail@w3.org>
- Date: Sat, 10 Sep 2005 09:32:08 +0000
- To: www-validator-cvs@w3.org
Update of /sources/public/validator/httpd/cgi-bin
In directory hutz:/tmp/cvs-serv15541
Modified Files:
check
Log Message:
minor cleanup, drop some obsolete code/comments
Index: check
===================================================================
RCS file: /sources/public/validator/httpd/cgi-bin/check,v
retrieving revision 1.447
retrieving revision 1.448
diff -u -d -r1.447 -r1.448
--- check 10 Sep 2005 09:00:28 -0000 1.447
+++ check 10 Sep 2005 09:32:06 -0000 1.448
@@ -83,9 +83,6 @@
use constant MODE_XML => 2; # 0000 0010
use constant MODE_TBD => 4; # 0000 0100, needs further info to decide.
-#@@FIXME: XML WF checking isn't implemented.
-use constant MODE_WF => 8; # 0000 1000, only XML well-formed checking.
-
#
# Define global variables.
use vars qw($DEBUG $CFG $RSRC $VERSION);
@@ -366,7 +363,7 @@
$DEBUG = FALSE; # The default.
}
-&abort_if_error_flagged($File, O_NONE); # Too early to &print_table.
+&abort_if_error_flagged($File, O_NONE);
#
# Get the file and metadata.
@@ -1023,9 +1020,7 @@
$File->{Modified} = $q->http('Last-Modified');
$File->{Server} = $q->http('User-Agent'); # Fake a "server". :-)
$File->{Size} = $q->http('Content-Length');
- $File->{URI} = "$f"; # Need to stringify because we want ref
- # to return false later in add_table. This
- # is also a file handle... see man CGI.
+ $File->{URI} = "$f";
$File->{'Is Upload'} = TRUE;
return $File;
@@ -1380,8 +1375,8 @@
#
# Reset DOCTYPE, Root (for second invocation, probably not needed anymore).
- $File->{DOCTYPE} = '';
- $File->{Root} = '';
+ $File->{DOCTYPE} = '';
+ $File->{Root} = '';
my $dtd = sub {
return if $File->{Root};
Received on Saturday, 10 September 2005 09:32:10 UTC