diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-08-25 10:31:09 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-08-25 10:31:09 +0000 |
| commit | 0bd79758c007682b3167c4559018edd4cd176bd8 (patch) | |
| tree | b98e509b2da13c46654512304b601e4e3f7bd910 /perl-install/standalone | |
| parent | 7a759bccdc48194e516e6d742cdbaa46f64a0571 (diff) | |
| download | drakx-backup-do-not-use-0bd79758c007682b3167c4559018edd4cd176bd8.tar drakx-backup-do-not-use-0bd79758c007682b3167c4559018edd4cd176bd8.tar.gz drakx-backup-do-not-use-0bd79758c007682b3167c4559018edd4cd176bd8.tar.bz2 drakx-backup-do-not-use-0bd79758c007682b3167c4559018edd4cd176bd8.tar.xz drakx-backup-do-not-use-0bd79758c007682b3167c4559018edd4cd176bd8.zip | |
rename loop variable in order to prevent trainee to be confused
Diffstat (limited to 'perl-install/standalone')
| -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(); }; |