require the version of File::Temp with the OO interface

[freeside.git] / FS / FS / cust_bill.pm

diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm
index 576e4c8..3b76dd2 100644 (file)
--- a/FS/FS/cust_bill.pm
+++ b/FS/FS/cust_bill.pm
@@ -5,7 +5,7 @@ use vars qw( @ISA $conf $money_char );
 use vars qw( $invoice_lines @buf ); #yuck
 use Date::Format;
 use Text::Template;
-use File::Temp;
+use File::Temp 0.14;
 use FS::UID qw( datasrc );
 use FS::Record qw( qsearch qsearchs );
 use FS::Misc qw( send_email );
@@ -1143,9 +1143,9 @@ sub print_ps {
   chdir($dir);
 
   system("pslatex $file.tex >/dev/null 2>&1") == 0
-    or die "pslatex failed: $!";
+    or die "pslatex $file.tex failed: $!";
   system("pslatex $file.tex >/dev/null 2>&1") == 0
-    or die "pslatex failed: $!";
+    or die "pslatex $file.tex failed: $!";
 
   system('dvips', '-q', '-t', 'letter', "$file.dvi", '-o', "$file.ps" ) == 0
     or die "dbips failed: $!";
@@ -1190,9 +1190,9 @@ sub print_pdf {
   #! LaTeX Error: Unknown graphics extension: .eps.
 
   system("pslatex $file.tex >/dev/null 2>&1") == 0
-    or die "pslatex failed: $!";
+    or die "pslatex $file.tex failed: $!";
   system("pslatex $file.tex >/dev/null 2>&1") == 0
-    or die "pslatex failed: $!";
+    or die "pslatex $file.tex failed: $!";
 
   #system('dvipdf', "$file.dvi", "$file.pdf" );
   system(
@@ -1200,7 +1200,7 @@ sub print_pdf {
     "| gs -q -dNOPAUSE -dBATCH -sDEVICE=pdfwrite -sOutputFile=$file.pdf ".
     "     -c save pop -"
   ) == 0
-    or die "dvips failed: $!";
+    or die "dvips | gs failed: $!";
 
   open(PDF, "<$file.pdf")
     or die "can't open $file.pdf: $! (error in LaTeX template?)\n";