From 0bd79758c007682b3167c4559018edd4cd176bd8 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 25 Aug 2004 10:31:09 +0000 Subject: rename loop variable in order to prevent trainee to be confused --- perl-install/standalone/service_harddrake | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install/standalone/service_harddrake') 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(); }; -- cgit v1.2.1