diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2003-10-15 14:35:58 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2003-10-15 14:35:58 +0000 |
commit | 39def6996941bb414d0d6ac9d50ba49933869017 (patch) | |
tree | b5caa7bac29e28a3a12f94e4d9eae22d4b642b4a /perl-install/install_any.pm | |
parent | 4eb12bd3c2b072e0a8b1b22422104b8d71f245d1 (diff) | |
download | drakx-39def6996941bb414d0d6ac9d50ba49933869017.tar drakx-39def6996941bb414d0d6ac9d50ba49933869017.tar.gz drakx-39def6996941bb414d0d6ac9d50ba49933869017.tar.bz2 drakx-39def6996941bb414d0d6ac9d50ba49933869017.tar.xz drakx-39def6996941bb414d0d6ac9d50ba49933869017.zip |
pass $o to getNextStep
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r-- | perl-install/install_any.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index d3b9db89b..093b90be2 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -192,8 +192,9 @@ sub clean_postinstall_rpms() { #-###################################################################################### #- Functions #-###################################################################################### -sub getNextStep() { - find { !$::o->{steps}{$_}{done} && $::o->{steps}{$_}{reachable} } @{$::o->{orderedSteps}} +sub getNextStep { + my ($o) = @_; + find { !$o->{steps}{$_}{done} && $o->{steps}{$_}{reachable} } @{$o->{orderedSteps}} } sub spawnShell() { |