From 38978067111c7a8c0fdaa37c445c46bec3694f90 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Sven=20Sch=C3=B6ling?= Date: Thu, 16 Feb 2012 13:53:05 +0100 Subject: [PATCH] installationcheck: defaultrun erkennung verbessert. (Hat auch auf -ro getriggert) --- scripts/installation_check.pl | 14 +++++++++----- 1 file changed, 9 insertions(+), 5 deletions(-) diff --git a/scripts/installation_check.pl b/scripts/installation_check.pl index 03b0ae574..520b4f1c2 100755 --- a/scripts/installation_check.pl +++ b/scripts/installation_check.pl @@ -29,11 +29,15 @@ GetOptions( ); # 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 +my $default_run; +if (!defined $check{a} + && !defined $check{l} + && !defined $check{o} + && !defined $check{d}) { + $check{r} = 1; + $default_run ='1'; # no parameter, therefore print a note after default run +} + if ($check{a}) { foreach my $check (keys %check) { $check{$check} = 1 unless defined $check{$check}; -- 2.20.1