Entwürfe: beim Buchen dazugehörigen Entwurf löschen

[mfinanz.git] / SL / Controller / Letter.pm

diff --git a/SL/Controller/Letter.pm b/SL/Controller/Letter.pm
index 3d704b8de3312594cbca206218533fae859fccfa..cfc1f6867176bca26cb973e0cae59ec499d7dcae 100644 (file)
--- a/SL/Controller/Letter.pm
+++ b/SL/Controller/Letter.pm
@@ -577,7 +577,7 @@ sub init_letter {
 #     ));
   }
 
-  $self->is_sales($letter->is_sales);
+  $self->is_sales($letter->is_sales) if $letter->id;
 
   $letter;
 }
@@ -616,7 +616,7 @@ sub init_webdav_objects {
   return [ map {
     +{ name => $_->filename,
        type => t8('File'),
-       link => File::Spec->catdir($webdav_path, $_->filename),
+       link => File::Spec->catfile($_->full_filedescriptor),
      }
   } @all_objects ];
 }