prepend correct DOCTYPE declaration

This commit is contained in:
david 2002-05-24 19:28:53 +00:00
parent 150e6c8ca5
commit 02c13c5e40
2 changed files with 8 additions and 1 deletions

View File

@ -25,10 +25,14 @@ specified as a command-line option.
=head1 OPTIONS
B<-a>, B<--article> wrap results in article tags and add DOCTYPE.
B<-o>, B<--output-to> I<filename> write to the specified file.
B<-v>, B<--verbose> show diagnostic output.
B<-V>, B<--version> show program version.
B<-h>, B<--help> show a usage message.
=head1 BUGS

View File

@ -88,7 +88,10 @@ sub ProcessFile {
# wrap article if requested
#
if ($article) {
$buf = '<!DOCTYPE article PUBLIC "-//OASIS//DTD DocBook V4.1//EN">' . "\n";
$buf = '<?xml version="1.0" standalone="no"?>';
$buf .= '<!DOCTYPE article PUBLIC "-//OASIS//DTD DocBook V4.1//EN"' . "\n";
$buf .= ' "http://docbook.org/xml/4.1.2/docbookx.dtd"[]>';
$buf .= "\n";
$buf .= '<article>' . "\n";
}