Webdav-Komponente: Das Erstellen des Verzeichnisses ausgelagert. Ferner den Beleg...

[mfinanz.git] / SL / Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index b63421750cdb9bf055616e1eccb618d8c591c8ea..ae51efd78b6b3dcc324c79779b1254b86c461802 100644 (file)
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -1203,7 +1203,6 @@ sub parse_template {
   local (*IN, *OUT);
 
   my $userspath = $::lx_office_conf{paths}->{userspath};
-
   $self->{"cwd"} = getcwd();
   $self->{"tmpdir"} = $self->{cwd} . "/${userspath}";
 
@@ -1295,6 +1294,7 @@ sub parse_template {
     $result = $template->parse(*STDOUT);
   }
 
+  Common::copy_file_to_webdav_folder($self)  if ($self->{webdav});
   if (!$result) {
     $self->cleanup();
     $self->error("$self->{IN} : " . $template->get_error());