From 4ecd85452536da71a719071945806e9e94b3144e Mon Sep 17 00:00:00 2001 From: "Martin Helmling martin.helmling@octosoft.eu" Date: Thu, 15 Sep 2016 17:12:18 +0200 Subject: [PATCH] MT940-Import: Installationscheck aqbanking MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Unter optionalen Prüfungen wird nach der Konfigurierung und Ausführbarkeit von aqbanking-cli geprüft --- scripts/installation_check.pl | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) diff --git a/scripts/installation_check.pl b/scripts/installation_check.pl index d32951b70..250fe1712 100755 --- a/scripts/installation_check.pl +++ b/scripts/installation_check.pl @@ -90,6 +90,7 @@ if ($check{r}) { if ($check{o}) { print_header('Checking Optional Modules'); check_module($_, optional => 1) for @SL::InstallationCheck::optional_modules; + check_aqbanking(); } if ($check{d}) { print_header('Checking Developer Modules'); @@ -197,6 +198,26 @@ EOL } } +sub check_aqbanking { + my $aqbin = $::lx_office_conf{applications}->{aqbanking}; + if ( !$aqbin ) { + print_line('Looking for aqbanking executable', 'not configured','red'); + } + else { + my $line = "Looking for aqbanking executable '".$aqbin."'"; + my $shell_out = `$aqbin versions 2>&1 | grep AqBanking-CLI 2> /dev/null`; + my ($label,$version) = split /:/,$shell_out; + if ( $label && $label eq ' AqBanking-CLI' ) { + chop $version; + print_line($line, $version, 'green'); + } else { + print_line($line, 'not installed','red'); + my %modinfo = ( name => 'aqbanking' ); + push @missing_modules, \%modinfo; + } + } +} + sub check_module { my ($module, %role) = @_; -- 2.20.1