S:P:Dunning: Link führt nicht mehr zum Drucken, sondern zum Mahnungsbericht, …

[kivitendo-erp.git] / SL / Template / HTML.pm

diff --git a/SL/Template/HTML.pm b/SL/Template/HTML.pm
index abca75c07e8b51455cbb6a7ddaddb358d17c6c83..ecc3410a82ae0cf0ba317208888e8067ef85a14e 100644 (file)
--- a/SL/Template/HTML.pm
+++ b/SL/Template/HTML.pm
@@ -70,10 +70,11 @@ sub convert_to_postscript {
     $psfile .= ".ps";
   }
 
-  system("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("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;
   }