X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FTemplate%2FHTML.pm;h=ecc3410a82ae0cf0ba317208888e8067ef85a14e;hb=24183a8d99a92a9cab623a497320a5f2e3212330;hp=1fa7252379b3644aa4670168d168e5770ee9f45f;hpb=0fba3edda47fca21bedb14eb88e0f5f8d983bb38;p=kivitendo-erp.git diff --git a/SL/Template/HTML.pm b/SL/Template/HTML.pm index 1fa725237..ecc3410a8 100644 --- 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,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; } @@ -106,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; }