X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/d5440cc6f9cc5b2942458ce7480526e2b90b17a4..2ecfde54bd40a15f430010faa28ec81383e4eec6:/SL/Template/HTML.pm

diff --git a/SL/Template/HTML.pm b/SL/Template/HTML.pm
index 0ff939fd8..ecc3410a8 100644
--- a/SL/Template/HTML.pm
+++ b/SL/Template/HTML.pm
@@ -70,10 +70,11 @@ sub convert_to_postscript {
     $psfile .= ".ps";
   }
 
-  system($::lx_office_conf{applications}->{html2ps} . " -f html2ps-config < $form->{tmpfile} > $psfile");
+  if (system($::lx_office_conf{applications}->{html2ps} . " -f html2ps-config < $form->{tmpfile} > $psfile") == -1) {
+    die "system call to $::lx_office_conf{applications}->{html2ps} failed: $!";
+  }
   if ($?) {
-    $self->{"error"} = $form->cleanup();
-    $self->cleanup();
+    $self->{"error"} = $form->cleanup($::lx_office_conf{applications}->{html2ps});
     return 0;
   }
 
@@ -103,10 +104,11 @@ sub convert_to_pdf {
     $pdffile .= ".pdf";
   }
 
-  system($::lx_office_conf{applications}->{html2ps} . " -f html2ps-config < $form->{tmpfile} | ps2pdf - $pdffile");
+  if (system($::lx_office_conf{applications}->{html2ps} . " -f html2ps-config < $form->{tmpfile} | ps2pdf - $pdffile") == -1) {
+    die "system call to $::lx_office_conf{applications}->{html2ps} failed: $!";
+  }
   if ($?) {
-    $self->{"error"} = $form->cleanup();
-    $self->cleanup();
+    $self->{"error"} = $form->cleanup($::lx_office_conf{applications}->{html2ps});
     return 0;
   }