From: Jan Büren <jan@lx-office-hosting.de>
Date: Mon, 16 Jan 2012 13:07:05 +0000 (+0100)
Subject: Falls installation_check.pl ohne Parameter aufgerufen wird, Standard->Hinweis auf... 
X-Git-Tag: release-2.7.0beta1~32^2~8
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=a12a2e5dcccd7d6f012ad4e89a57d24ba5461352;p=kivitendo-erp.git

Falls installation_check.pl ohne Parameter aufgerufen wird, Standard->Hinweis auf weitere Optionen
---

diff --git a/scripts/installation_check.pl b/scripts/installation_check.pl
index 0f0dc202b..ba02252af 100755
--- a/scripts/installation_check.pl
+++ b/scripts/installation_check.pl
@@ -28,12 +28,12 @@ GetOptions(
   "c|color!"    => \ ( my $c = 1 ),
 );
 
-# if notihing is requested check "required"
+# if nothing is requested check "required"
 $check{r} = 1 unless defined $check{a} ||
                      defined $check{l} ||
                      defined $check{o} ||
                      defined $check{d};
-
+my $default_run ='1' if $check{r};  # no parameter, therefore print a note after default run
 if ($check{a}) {
   foreach my $check (keys %check) {
     $check{$check} = 1 unless defined $check{$check};
@@ -46,6 +46,7 @@ $| = 1;
 if ($check{r}) {
   print_header('Checking Required Modules');
   check_module($_, required => 1) for @SL::InstallationCheck::required_modules;
+  print_header('Standard check for required modules done. See additional parameters for more checks (-- help)') if $default_run;
 }
 if ($check{o}) {
   print_header('Checking Optional Modules');