From: Jan Büren <jan@kivitendo.de>
Date: Tue, 25 Aug 2020 16:20:50 +0000 (+0200)
Subject: aqbanking 6.x benötigt weitere Unterordner
X-Git-Tag: release-3.5.6.1~54
X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/commitdiff_plain/67089fda948079650aab17c8aac9cda29f99b579

aqbanking 6.x benötigt weitere Unterordner

Durch die verkettung der Systemaufrufe kann der
MT940 Import aktuell erst beim zweiten Aufruf ausgeführt werden (ubuntu 20.04)
Das Anlegen der Unterordner umgeht diese Eigenschaft
---

diff --git a/SL/Helper/MT940.pm b/SL/Helper/MT940.pm
index 34b08c165..c25fd5962 100644
--- a/SL/Helper/MT940.pm
+++ b/SL/Helper/MT940.pm
@@ -15,9 +15,15 @@ sub convert_mt940_data {
   $sfile->fh->print($mt940_data);
   $sfile->fh->close;
 
+  # create needed dir structure for aqbanking 5.x and 6.x
   my $todir = $sfile->get_path . '/imexporters/csv/profiles';
   mkpath $todir;
+  die "Cannot create $todir" unless -d $todir;
+
   File::Copy::copy('users/aqbanking.conf', $todir.'/kivi.conf');
+  die "Cannot create local aqbanking conf " unless -f $todir.'/kivi.conf';
+
+  mkpath $sfile->get_path . '/settings6/aqbanking';
 
   my $aqbin = $::lx_office_conf{applications}->{aqbanking};
   die "Can't find aqbanking-cli, please check your configuration file.\n" unless -f $aqbin;