Nach Request alle Datenbankhandle rollbacken

[mfinanz.git] / SL / Template / HTML.pm

diff --git a/SL/Template/HTML.pm b/SL/Template/HTML.pm
index 1fa7252379b3644aa4670168d168e5770ee9f45f..09f24fcebc5bf799ac99e6f60d27d93f6bd7222d 100644 (file)
--- a/SL/Template/HTML.pm
+++ b/SL/Template/HTML.pm
@@ -1,9 +1,6 @@
 package SL::Template::HTML;
 
-use SL::Template::LaTeX;
-
-use vars qw(@ISA);
-@ISA = qw(SL::Template::LaTeX);
+use parent qw(SL::Template::LaTeX);
 
 use strict;
 
@@ -73,10 +70,9 @@ sub convert_to_postscript {
     $psfile .= ".ps";
   }
 
-  system("html2ps -f html2ps-config < $form->{tmpfile} > $psfile");
+  system($::lx_office_conf{applications}->{html2ps} . " -f html2ps-config < $form->{tmpfile} > $psfile");
   if ($?) {
-    $self->{"error"} = $form->cleanup();
-    $self->cleanup();
+    $self->{"error"} = $form->cleanup($::lx_office_conf{applications}->{html2ps});
     return 0;
   }
 
@@ -106,10 +102,9 @@ sub convert_to_pdf {
     $pdffile .= ".pdf";
   }
 
-  system("html2ps -f html2ps-config < $form->{tmpfile} | ps2pdf - $pdffile");
+  system($::lx_office_conf{applications}->{html2ps} . " -f html2ps-config < $form->{tmpfile} | ps2pdf - $pdffile");
   if ($?) {
-    $self->{"error"} = $form->cleanup();
-    $self->cleanup();
+    $self->{"error"} = $form->cleanup($::lx_office_conf{applications}->{html2ps});
     return 0;
   }