X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/f207efd1ad8835c046c2945c3d0d693626622521..b01d84a98b1091f452adc5857903ea85c1e644f1:/scripts/installation_check.pl diff --git a/scripts/installation_check.pl b/scripts/installation_check.pl index 1b645733c..43b290a35 100755 --- a/scripts/installation_check.pl +++ b/scripts/installation_check.pl @@ -71,9 +71,7 @@ if (!defined $check{a} } if ($check{a}) { - foreach my $check (keys %check) { - $check{$check} = 1 unless defined $check{$check}; - } + $check{$_} //= 1 for qw(o d l r); }