version 1.3, 2002/07/19 14:27:05
|
version 1.5, 2002/07/25 15:19:03
|
Line 62 if ( defined ( $ARGV[2] ) ) # override e
|
Line 62 if ( defined ( $ARGV[2] ) ) # override e
|
|
|
my $redir = ">& /dev/null"; # empty this for easier debugging |
my $redir = ">& /dev/null"; # empty this for easier debugging |
|
|
mkdir $tmpdir; |
mkdir $tmpdir, 0755; |
|
|
print "Converting texxml to tex...\n"; |
print "Converting texxml to tex...\n"; |
system ( "perl texxml2latex.pl $fileroot.texxml > $tmpdir/$fileroot.tex" ); |
system ( "perl texxml2latex.pl $fileroot.texxml > $tmpdir/$fileroot.tex" ); |
Line 72 system ( "cp $epssource/* $tmpdir/" );
|
Line 72 system ( "cp $epssource/* $tmpdir/" );
|
|
|
# \scrollmode\input causes LaTeX to not stop on errors |
# \scrollmode\input causes LaTeX to not stop on errors |
print "Running Latex...\n"; |
print "Running Latex...\n"; |
system ( "cd $tmpdir; latex \"\\scrollmode\\input $fileroot\" $redir; latex \"\\scrollmode\\input $fileroot\ $redir; latex \"\\scrollmode\\input $fileroot\ $redir; " ); |
system ( "cd $tmpdir; echo | latex $fileroot $redir; echo | latex $fileroot $redir; echo | latex $fileroot\ $redir; " ); |
|
|
print "Running dvips...\n"; |
print "Running dvips...\n"; |
system ( "cd $tmpdir; dvips -f $fileroot.dvi > $fileroot.ps $redir " ); |
system ( "cd $tmpdir; dvips -f $fileroot.dvi > $fileroot.ps $redir " ); |