X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/46e9355a07d3ba6e1ea1d95a893d6ed4c8b31487..ffb7da30ec503c647ae493ba8ffd48cc43fa44e7:/scripts/installation_check.pl diff --git a/scripts/installation_check.pl b/scripts/installation_check.pl index fa6083839..743316a46 100755 --- a/scripts/installation_check.pl +++ b/scripts/installation_check.pl @@ -13,6 +13,7 @@ BEGIN { use strict; use Getopt::Long; +use List::MoreUtils qw(uniq); use Pod::Usage; use Term::ANSIColor; use Text::Wrap; @@ -156,7 +157,12 @@ sub check_template_dir { print_header("Checking LaTeX Dependencies for Master Templates '$dir'"); kpsewhich($path, 'cls', $_) for SL::InstallationCheck::classes_from_latex($path, '\documentclass'); - kpsewhich($path, 'sty', $_) for SL::InstallationCheck::classes_from_latex($path, '\usepackage'); + + my @sty = sort { $a cmp $b } uniq ( + SL::InstallationCheck::classes_from_latex($path, '\usepackage'), + qw(textcomp ulem pdfx embedfile) + ); + kpsewhich($path, 'sty', $_) for @sty; } our $mastertemplate_path = './templates/print/'; @@ -228,7 +234,12 @@ sub check_aqbanking { my ($label,$version) = split /:/,$shell_out; if ( $label && $label eq ' AqBanking-CLI' ) { chop $version; - print_line($line, $version, 'green'); + my ($number_version) = $version =~ /(\d+)/; + if ($number_version < 6) { + print_line($line, "Requires at least version 6, current version is " . $version, 'red'); + } else { + print_line($line, $version, 'green'); + } } else { print_line($line, 'not installed','red'); my %modinfo = ( name => 'aqbanking' );