Revision 38978067
Von Sven Schöling vor fast 13 Jahren hinzugefügt
| scripts/installation_check.pl | ||
|---|---|---|
| 29 | 29 |
); |
| 30 | 30 |
|
| 31 | 31 |
# if nothing is requested check "required" |
| 32 |
$check{r} = 1 unless defined $check{a} ||
|
|
| 33 |
defined $check{l} ||
|
|
| 34 |
defined $check{o} ||
|
|
| 35 |
defined $check{d};
|
|
| 36 |
my $default_run ='1' if $check{r}; # no parameter, therefore print a note after default run
|
|
| 32 |
my $default_run; |
|
| 33 |
if (!defined $check{a}
|
|
| 34 |
&& !defined $check{l}
|
|
| 35 |
&& !defined $check{o}
|
|
| 36 |
&& !defined $check{d}) {
|
|
| 37 |
$check{r} = 1;
|
|
| 38 |
$default_run ='1'; # no parameter, therefore print a note after default run |
|
| 39 |
} |
|
| 40 |
|
|
| 37 | 41 |
if ($check{a}) {
|
| 38 | 42 |
foreach my $check (keys %check) {
|
| 39 | 43 |
$check{$check} = 1 unless defined $check{$check};
|
Auch abrufbar als: Unified diff
installationcheck: defaultrun erkennung verbessert. (Hat auch auf -ro getriggert)