diff options
| author | Francois Pons <fpons@mandriva.com> | 2002-07-15 12:27:20 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2002-07-15 12:27:20 +0000 |
| commit | 70b2a91a4609c2d023d88764781570b26be0d881 (patch) | |
| tree | c934bf9e46a02b6f5b63c52c31d0089da101021a /perl-install/install_steps_interactive.pm | |
| parent | 3b144b013f74fc06fb15a15c43f70bc0bfad9bd3 (diff) | |
| download | drakx-70b2a91a4609c2d023d88764781570b26be0d881.tar drakx-70b2a91a4609c2d023d88764781570b26be0d881.tar.gz drakx-70b2a91a4609c2d023d88764781570b26be0d881.tar.bz2 drakx-70b2a91a4609c2d023d88764781570b26be0d881.tar.xz drakx-70b2a91a4609c2d023d88764781570b26be0d881.zip | |
fixed reference to no more used variable since new callback scheme.
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index e268f37f7..63387c35f 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -772,7 +772,7 @@ sub installPackages { my $p = $data->{depslist}[$id]; $w->set(_("Installing package %s\n%d%%", $p->name, $total && 100 * $current / $total)); $current += $p->size; - } else { unshift @_, $m; goto $old } + } else { goto $old } }; #- the modification is not local as the box should be living for other package installation. |