X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/46135cc6988f5ce2d8d1be1627651e5da28d64ae..0b34e29fb04ad9ac9912f67b767f9f401700ca97:/scripts/installation_check.pl

diff --git a/scripts/installation_check.pl b/scripts/installation_check.pl
index 43b290a35..f7c76fb7c 100755
--- a/scripts/installation_check.pl
+++ b/scripts/installation_check.pl
@@ -121,7 +121,7 @@ EOL
   }
 }
 
-if (@missing_modules && $apt && !$check{s}) {
+if (@missing_modules && ($check{a} || $apt && !$check{s})) {
   print "\nHere are some sample installation lines, choose one appropriate for your system:\n\n";
   local $Text::Wrap::separator = " \\\n";
 
@@ -271,12 +271,12 @@ sub print_result {
 
 sub print_line {
   my ($text, $res, $color) = @_;
-  return if $check{s};
+  return if $check{s} && !$check{a};
   print $text, " ", ('.' x (78 - length($text) - length($res))), " ", mycolor($res, $color), $/;
 }
 
 sub print_header {
-  return if $check{s};
+  return if $check{s} && !$check{a};
   print $/;
   print "$_[0]:", $/;
 }