Revision 4ecd8545
Von Martin Helmling martin.helmling@octosoft.eu vor etwa 8 Jahren hinzugefügt
| scripts/installation_check.pl | ||
|---|---|---|
| 90 | 90 |
if ($check{o}) {
|
| 91 | 91 |
print_header('Checking Optional Modules');
|
| 92 | 92 |
check_module($_, optional => 1) for @SL::InstallationCheck::optional_modules; |
| 93 |
check_aqbanking(); |
|
| 93 | 94 |
} |
| 94 | 95 |
if ($check{d}) {
|
| 95 | 96 |
print_header('Checking Developer Modules');
|
| ... | ... | |
| 197 | 198 |
} |
| 198 | 199 |
} |
| 199 | 200 |
|
| 201 |
sub check_aqbanking {
|
|
| 202 |
my $aqbin = $::lx_office_conf{applications}->{aqbanking};
|
|
| 203 |
if ( !$aqbin ) {
|
|
| 204 |
print_line('Looking for aqbanking executable', 'not configured','red');
|
|
| 205 |
} |
|
| 206 |
else {
|
|
| 207 |
my $line = "Looking for aqbanking executable '".$aqbin."'"; |
|
| 208 |
my $shell_out = `$aqbin versions 2>&1 | grep AqBanking-CLI 2> /dev/null`; |
|
| 209 |
my ($label,$version) = split /:/,$shell_out; |
|
| 210 |
if ( $label && $label eq ' AqBanking-CLI' ) {
|
|
| 211 |
chop $version; |
|
| 212 |
print_line($line, $version, 'green'); |
|
| 213 |
} else {
|
|
| 214 |
print_line($line, 'not installed','red'); |
|
| 215 |
my %modinfo = ( name => 'aqbanking' ); |
|
| 216 |
push @missing_modules, \%modinfo; |
|
| 217 |
} |
|
| 218 |
} |
|
| 219 |
} |
|
| 220 |
|
|
| 200 | 221 |
sub check_module {
|
| 201 | 222 |
my ($module, %role) = @_; |
| 202 | 223 |
|
Auch abrufbar als: Unified diff
MT940-Import: Installationscheck aqbanking
Unter optionalen Prüfungen wird nach der Konfigurierung und
Ausführbarkeit von aqbanking-cli geprüft