diff options
| -rwxr-xr-x | perl-install/standalone/service_harddrake | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/service_harddrake b/perl-install/standalone/service_harddrake index d8f9c742d..e47c2a1c1 100755 --- a/perl-install/standalone/service_harddrake +++ b/perl-install/standalone/service_harddrake @@ -155,12 +155,12 @@ foreach my $hw_class (@harddrake::data::tree) { eval { $configurator->() }; log::explanations(qw(cannot run "$configurator": $@)) if $@; } elsif (!$no && $res) { - foreach my $configurator (@configurator_pool) { + foreach my $program (@configurator_pool) { if (fork()) { wait(); } else { - exec("$configurator 2>/dev/null") or do { - log::explanations(qw(cannot run "$configurator")); + exec("$program 2>/dev/null") or do { + log::explanations(qw(cannot run "$program")); require POSIX; POSIX::_exit(); }; |