projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Beispielscript für CSV-Import über die Kommandozeile
[kivitendo-erp.git]
/
SL
/
DN.pm
diff --git
a/SL/DN.pm
b/SL/DN.pm
index
e9a7e81
..
b00a83b
100644
(file)
--- a/
SL/DN.pm
+++ b/
SL/DN.pm
@@
-667,7
+667,7
@@
sub melt_pdfs {
$dunning_id =~ s|[^\d]||g;
$dunning_id =~ s|[^\d]||g;
- my $in = IO::File->new(
"gs
-dBATCH -dNOPAUSE -q -sDEVICE=pdfwrite -sOutputFile=- $inputfiles |");
+ my $in = IO::File->new(
$::lx_office_conf{applications}->{ghostscript} . "
-dBATCH -dNOPAUSE -q -sDEVICE=pdfwrite -sOutputFile=- $inputfiles |");
$form->error($main::locale->text('Could not spawn ghostscript.')) unless $in;
if ($form->{media} eq 'printer') {
$form->error($main::locale->text('Could not spawn ghostscript.')) unless $in;
if ($form->{media} eq 'printer') {
@@
-794,7
+794,7
@@
sub print_dunning {
my $filename = "dunning_${dunning_id}_" . Common::unique_id() . ".pdf";
my $spool = $::lx_office_conf{paths}->{spool};
my $filename = "dunning_${dunning_id}_" . Common::unique_id() . ".pdf";
my $spool = $::lx_office_conf{paths}->{spool};
- $form->{OUT} = "
>
${spool}/$filename";
+ $form->{OUT} = "${spool}/$filename";
$form->{keep_tmpfile} = 1;
delete $form->{tmpfile};
$form->{keep_tmpfile} = 1;
delete $form->{tmpfile};
@@
-888,7
+888,7
@@
sub print_invoice_for_fees {
my $filename = Common::unique_id() . "dunning_invoice_${dunning_id}.pdf";
my $spool = $::lx_office_conf{paths}->{spool};
my $filename = Common::unique_id() . "dunning_invoice_${dunning_id}.pdf";
my $spool = $::lx_office_conf{paths}->{spool};
- $form->{OUT} = "
>
$spool/$filename";
+ $form->{OUT} = "$spool/$filename";
$form->{keep_tmpfile} = 1;
delete $form->{tmpfile};
$form->{keep_tmpfile} = 1;
delete $form->{tmpfile};