updated; fixed some processing w/XML; htmldoc pts to first page

This commit is contained in:
gferg 2001-01-25 22:13:24 +00:00
parent 21fea0b490
commit 88b1b2483c
1 changed files with 11 additions and 9 deletions

View File

@ -64,7 +64,7 @@ if( $style eq '' ) {
# determine DTD # determine DTD
# #
open(FP_IN, "head -50 $fname | grep -i '\!doctype' |") || open(FP_IN, "head -100 $fname | grep -i '\!doctype' |") ||
die "\nldp_mk: ERROR - cannot determine DTD for $fname\n"; die "\nldp_mk: ERROR - cannot determine DTD for $fname\n";
$s = <FP_IN>; $s = <FP_IN>;
close(FP_IN); close(FP_IN);
@ -126,11 +126,13 @@ if( $linuxdoc == 0 && $create_index == 1 ) {
print "\nldp_mk: creating index from $fname...\n"; print "\nldp_mk: creating index from $fname...\n";
$cmd = $cmd =
"$_toolroot/mkindex/collateindex.pl -N -o index.sgml; " . "$_toolroot/mkindex/collateindex.pl -N -o index." .
"$_toolroot/$_jade/jade/jade -t sgml -V html-index -d $style $dcl $fname ; " . ($dtd eq 'XML' ? "xml;" : "sgml;") .
"$_toolroot/$_jade/jade/jade -t sgml -V html-index -d $style $dcl $fname; " .
"$_toolroot/mkindex/collateindex.pl -g -t Index -i doc-index " . "$_toolroot/mkindex/collateindex.pl -g -t Index -i doc-index " .
"-o index.sgml HTML.index;" . "-o index." . ($dtd eq 'XML' ? "xml" : "sgml") . " HTML.index;" .
"rm -f HTML.index"; "rm -f HTML.index";
system($cmd); system($cmd);
} }
@ -271,10 +273,10 @@ if( $linuxdoc == 1 ) {
if( -e "00_$fname_wo_ext.html" ) { if( -e "00_$fname_wo_ext.html" ) {
$cmd = "$_toolroot/htmldoc/bin/htmldoc --size universal -t pdf -f " . $cmd = "$_toolroot/htmldoc/bin/htmldoc --size universal -t pdf " .
"$fname_wo_ext.pdf $print_str; " . "--firstpage p1 -f $fname_wo_ext.pdf $print_str; " .
"$_toolroot/htmldoc/bin/htmldoc --size universal -t ps -f " . "$_toolroot/htmldoc/bin/htmldoc --size universal -t ps " .
"$fname_wo_ext.ps $print_str"; "--firstpage p1 -f $fname_wo_ext.ps $print_str";
system($cmd); system($cmd);
if( !(-e "$fname_wo_ext.pdf") ) { if( !(-e "$fname_wo_ext.pdf") ) {
@ -347,7 +349,7 @@ if( $linuxdoc == 1 ) {
# cleanup # cleanup
system("rm -f index.sgml body.html title.html"); system("rm -f index.sgml index.xml body.html title.html");
print "\nldp_mk: completed...\n"; print "\nldp_mk: completed...\n";