X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/262811c8effee37078b9d22695cb44b4960b5e7d..refs/heads/master:/SL/Helper/File.pm diff --git a/SL/Helper/File.pm b/SL/Helper/File.pm index 96901184b..e658b05e9 100644 --- a/SL/Helper/File.pm +++ b/SL/Helper/File.pm @@ -25,13 +25,14 @@ sub store_pdf { return if !$id || !$type; SL::File->save( - object_id => $id, - object_type => $type, - mime_type => 'application/pdf', - source => 'created', - file_type => 'document', - file_name => $form->{attachment_filename}, - file_path => $form->{tmpfile}, + object_id => $id, + object_type => $type, + mime_type => 'application/pdf', + source => 'created', + file_type => 'document', + file_name => $form->{attachment_filename}, + file_path => $form->{tmpfile}, + print_variant => $form->{formname}, ); }