X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FOE.pm;h=8adaf6af24677961895503d60bcd5500d4b86c81;hb=3a94f4d2dd9a835d4a7007e1b999ea00b3c4e1cd;hp=7f0c8e3632ebc4a1c91450f1f83f347c6ae89c13;hpb=0b2ca0abb53db0d372bcc51e8093abb30f2aeea6;p=kivitendo-erp.git diff --git a/SL/OE.pm b/SL/OE.pm index 7f0c8e363..8adaf6af2 100644 --- a/SL/OE.pm +++ b/SL/OE.pm @@ -567,7 +567,7 @@ sub save { $form->{saved_xyznumber} = $form->{$form->{type} =~ /_quotation$/ ? "quonumber" : "ordnumber"}; - Common::webdav_folder($form) if ($main::webdav); + Common::webdav_folder($form); my $rc = $dbh->commit; @@ -655,7 +655,7 @@ sub _close_quotations_rfqs { sub delete { $main::lxdebug->enter_sub(); - my ($self, $myconfig, $form, $spool) = @_; + my ($self, $myconfig, $form) = @_; # connect to database my $dbh = $form->dbconnect_noauto($myconfig); @@ -705,6 +705,7 @@ sub delete { $dbh->disconnect; if ($rc) { + my $spool = $::lx_office_conf{paths}->{spool}; foreach $spoolfile (@spoolfiles) { unlink "$spool/$spoolfile" if $spoolfile; } @@ -992,7 +993,7 @@ sub retrieve { $form->{exchangerate} = $form->get_exchangerate($dbh, $form->{currency}, $form->{transdate}, ($form->{vc} eq 'customer') ? "buy" : "sell"); - Common::webdav_folder($form) if ($main::webdav); + Common::webdav_folder($form); $self->load_periodic_invoice_config($form);