diff options
| -rwxr-xr-x | httpd/cgi-bin/check | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/httpd/cgi-bin/check b/httpd/cgi-bin/check index fbbe98a..84e19ab 100755 --- a/httpd/cgi-bin/check +++ b/httpd/cgi-bin/check @@ -8,7 +8,7 @@ # This source code is available under the license at: # http://www.w3.org/Consortium/Legal/copyright-software # -# $Id: check,v 1.53 1999-12-06 00:27:50 gerald Exp $ +# $Id: check,v 1.54 1999-12-06 03:35:04 gerald Exp $ # # We need Perl 5.004. @@ -51,7 +51,7 @@ my $frag_db = $html_path . 'config/frag.cfg'; my $type_db = $html_path . 'config/type.cfg'; my $sgmlstuff = $html_path . 'sgml-lib'; my $sgmldecl = $sgmlstuff . '/REC-html40-19980424/HTML4.decl'; -my $xhtmldecl = $sgmlstuff . '/PR-xhtml1-19990824/xhtml1.dcl'; +my $xhtmldecl = $sgmlstuff . '/WD-xhtml1-19991124/xhtml1.dcl'; my $xmldecl = $sgmlstuff . '/sp-1.3/pubtext/xml.dcl'; my $temp = "/tmp/validate.$$"; # @@ Use POSIX/IO::File tmpfiles instead! @@ -73,9 +73,9 @@ my $element_ref = 'http://www.htmlhelp.com/reference/html40/'; # # Strings -$VERSION = q$Revision: 1.53 $; +$VERSION = q$Revision: 1.54 $; $VERSION =~ s/Revision: ([\d\.]+) /$1/; -$DATE = q$Date: 1999-12-06 00:27:50 $; +$DATE = q$Date: 1999-12-06 03:35:04 $; $MAINTAINER = 'gerald@w3.org'; my $notice = ''; # "<p><strong>Note: This service will be ...</strong>"; @@ -323,8 +323,8 @@ print(' ' x 4, q(<li>Content length: ), $File->{Size}, qq(</li>\n)) my $xmlflags = ''; my $decl = ''; if ($File->{Type} eq 'xhtml') { - $ENV{SP_CATALOG_FILES} = $sgmlstuff . '/PR-xhtml1-19990824/xhtml.soc'; - $ENV{SGML_SEARCH_PATH} = $sgmlstuff . '/PR-xhtml1-19990824/'; + $ENV{SP_CATALOG_FILES} = $sgmlstuff . '/WD-xhtml1-19991124/xhtml.cat'; + $ENV{SGML_SEARCH_PATH} = $sgmlstuff . '/WD-xhtml1-19991124/'; $ENV{SP_CHARSET_FIXED} = 'YES'; $ENV{SP_ENCODING} = 'XML'; $xmlflags = '-wxml '; |