doc/help/render.texxml.pl - diff

Return to render.texxml.pl CVS log

Up to [LON-CAPA] / doc / help

version 1.10, 2003/04/01 04:30:10	version 1.11, 2003/07/01 18:20:52
Line 59 if (substr($fileroot, -7) eq ".texxml")	Line 59 if (substr($fileroot, -7) eq ".texxml")
$fileroot = substr($fileroot, 0, -7);	$fileroot = substr($fileroot, 0, -7);
}	}

my $epssource = "/home/httpd/html/adm/help/eps";	my $epssource = "../../loncom/html/adm/help/eps";

if ( defined ( $ARGV[2] ) ) # override eps source, for build on install	if ( defined ( $ARGV[2] ) ) # override eps source, for build on install
{	{
$epssource = $ARGV[2];	$epssource = $ARGV[2];
}	}

my $redir = ">& /dev/null"; # empty this for easier debugging	#my $redir = ">& /dev/null"; # empty this for easier debugging
#my $redir = ">> /home/jerf/work/loncapa/doc/help/error_log.txt";	my $redir = ">> error_log.txt";

mkdir $tmpdir, 0755;	mkdir $tmpdir, 0755;

Line 90 print "Converting to PDF (may take a bit	Line 90 print "Converting to PDF (may take a bit
system ( "ps2pdf $fileroot.ps $fileroot.pdf" );	system ( "ps2pdf $fileroot.ps $fileroot.pdf" );

print "Clearing temp directory...\n";	print "Clearing temp directory...\n";
system ( "rm -rf $tmpdir" );	#system ( "rm -rf $tmpdir" );

if ( -e $fileroot . ".ps" )	if ( -e $fileroot . ".ps" )
{	{