summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/service_harddrake
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/standalone/service_harddrake')
-rwxr-xr-xperl-install/standalone/service_harddrake6
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();
};