From 3fdf284406a544178c13603e0da5c8848bac6301 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Jan=20B=C3=BCren?= Date: Mon, 25 Sep 2017 16:58:30 +0200 Subject: [PATCH] =?utf8?q?Mailer.pm=20wurde=20umgebaut,=20vergessene=20Cal?= =?utf8?q?ler=20ge=C3=A4ndert?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Behebt #303, ggf. noch weitere Stellen betroffen. --- SL/Controller/Letter.pm | 4 ++-- SL/DN.pm | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/SL/Controller/Letter.pm b/SL/Controller/Letter.pm index 9efca360c..780d7f99a 100644 --- a/SL/Controller/Letter.pm +++ b/SL/Controller/Letter.pm @@ -241,8 +241,8 @@ sub action_print_letter { my $signature = $::myconfig{signature}; $mail->{$_} = $params{email}->{$_} for qw(to cc subject message bcc); $mail->{from} = qq|"$::myconfig{name}" <$::myconfig{email}>|; - $mail->{attachments} = [{ filename => $result{file_name}, - name => $params{email}->{attachment_filename} }]; + $mail->{attachments} = [{ path => $result{file_name}, + name => $params{email}->{attachment_filename} }]; $mail->{message} .= "\n-- \n$signature"; $mail->{message} =~ s/\r//g; diff --git a/SL/DN.pm b/SL/DN.pm index adb58b711..cf800dac5 100644 --- a/SL/DN.pm +++ b/SL/DN.pm @@ -904,7 +904,7 @@ sub print_dunning { delete $form->{tmpfile}; push @{ $form->{DUNNING_PDFS} }, $filename; - push @{ $form->{DUNNING_PDFS_EMAIL} }, { 'filename' => "${spool}/$filename", + push @{ $form->{DUNNING_PDFS_EMAIL} }, { 'path' => "${spool}/$filename", 'name' => $form->get_formname_translation('dunning') . "_${dunning_id}.pdf" }; $form->get_employee_data('prefix' => 'employee', 'id' => $form->{employee_id}); -- 2.20.1