rename loop variable in order to prevent trainee to be confused

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();
                 };