--- doc/help/render.texxml.pl 2002/07/18 14:58:03 1.2 +++ doc/help/render.texxml.pl 2002/07/19 14:27:05 1.3 @@ -60,6 +60,8 @@ if ( defined ( $ARGV[2] ) ) # override e $epssource = $ARGV[2]; } +my $redir = ">& /dev/null"; # empty this for easier debugging + mkdir $tmpdir; print "Converting texxml to tex...\n"; @@ -68,16 +70,24 @@ system ( "perl texxml2latex.pl $fileroot print "Copying .eps files...\n"; system ( "cp $epssource/* $tmpdir/" ); +# \scrollmode\input causes LaTeX to not stop on errors print "Running Latex...\n"; -system ( "cd $tmpdir; latex $fileroot >& /dev/null; latex $fileroot >& /dev/null; latex $fileroot >& /dev/null; " ); +system ( "cd $tmpdir; latex \"\\scrollmode\\input $fileroot\" $redir; latex \"\\scrollmode\\input $fileroot\ $redir; latex \"\\scrollmode\\input $fileroot\ $redir; " ); print "Running dvips...\n"; -system ( "cd $tmpdir; dvips -f $fileroot.dvi > $fileroot.ps >& /dev/null " ); +system ( "cd $tmpdir; dvips -f $fileroot.dvi > $fileroot.ps $redir " ); print "Copying ps file...\n"; system ( "cp $tmpdir/$fileroot.ps ."); print "Clearing temp directory...\n"; -system ( "rm -rf $tmpdir" ); +#system ( "rm -rf $tmpdir" ); -print "$fileroot.ps is ready, if all went well.\n"; +if ( -e $fileroot . ".ps" ) +{ + print "$fileroot.ps is ready.\n"; +} +else +{ + print "Generationr of $fileroot.ps failed.\n"; +}