X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8e51379e94d291d21add91bdbfbfe925433ea6c0..9bd4eea3eaa7aaa37f91b192e1576181a72cbe69:/SL/Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index 1610704c8..7f66f6fbf 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -1087,7 +1087,8 @@ sub parse_template {
 
   if ( !$self->{preview} && $ext_for_format eq 'pdf' && $::instance_conf->get_doc_storage) {
     $self->{attachment_filename} ||= $self->generate_attachment_filename;
-    $self->{print_file_id} = $self->store_pdf($self)->id;
+    my $file_obj = $self->store_pdf($self);
+    $self->{print_file_id} = $file_obj->id if $file_obj;
   }
   if ($self->{media} eq 'email') {
     if ( getcwd() eq $self->{"tmpdir"} ) {