diff options
| author | ivan <ivan> | 2004-06-25 10:16:08 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2004-06-25 10:16:08 +0000 |
| commit | a78922d1673c7f79658d3b51353b4f63102bc7c8 (patch) | |
| tree | d600ce5b807144bf94b52ea851b99b12bc3bdfba /FS | |
| parent | aa1cb9bddae4756d832b953e8cfbe184ef77a16f (diff) | |
really fix latex printing when datasrc contains a ;
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/cust_bill.pm | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index bb12de042..f31e455ba 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -1162,9 +1162,11 @@ sub print_ps { my $dir = $FS::UID::conf_dir. "cache.". $FS::UID::datasrc; chdir($dir); - system("pslatex $file.tex >/dev/null 2>&1") == 0 + my $sfile = shell_quote $file; + + system("pslatex $sfile.tex >/dev/null 2>&1") == 0 or die "pslatex $file.tex failed: $!"; - system("pslatex $file.tex >/dev/null 2>&1") == 0 + system("pslatex $sfile.tex >/dev/null 2>&1") == 0 or die "pslatex $file.tex failed: $!"; system('dvips', '-q', '-t', 'letter', "$file.dvi", '-o', "$file.ps" ) == 0 @@ -1209,13 +1211,14 @@ sub print_pdf { #system('pdflatex', "$file.tex"); #! LaTeX Error: Unknown graphics extension: .eps. - system("pslatex $file.tex >/dev/null 2>&1") == 0 + my $sfile = shell_quote $file; + + system("pslatex $sfile.tex >/dev/null 2>&1") == 0 or die "pslatex $file.tex failed: $!"; - system("pslatex $file.tex >/dev/null 2>&1") == 0 + system("pslatex $sfile.tex >/dev/null 2>&1") == 0 or die "pslatex $file.tex failed: $!"; #system('dvipdf', "$file.dvi", "$file.pdf" ); - my $sfile = shell_quote $file; system( "dvips -q -t letter -f $sfile.dvi ". "| gs -q -dNOPAUSE -dBATCH -sDEVICE=pdfwrite -sOutputFile=$sfile.pdf ". |