diff options
| author | Francois Pons <fpons@mandriva.com> | 2002-08-12 12:53:00 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2002-08-12 12:53:00 +0000 |
| commit | fc07935bf7a8034d4fc1838e33e19ac40b001716 (patch) | |
| tree | 57754f89d69a8d69cb7872214e2ceac81484a77b /perl-install | |
| parent | 39353e64a9dab2b434b5a940f7a762e9fb382b73 (diff) | |
| download | drakx-fc07935bf7a8034d4fc1838e33e19ac40b001716.tar drakx-fc07935bf7a8034d4fc1838e33e19ac40b001716.tar.gz drakx-fc07935bf7a8034d4fc1838e33e19ac40b001716.tar.bz2 drakx-fc07935bf7a8034d4fc1838e33e19ac40b001716.tar.xz drakx-fc07935bf7a8034d4fc1838e33e19ac40b001716.zip | |
synced to force calling selectPackagesAlreadyInstalled in order to have
installed and upgrade computed (necessary to known if a package is already
installed or will be upgradable to compute size more precisely).
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 5cace73cb..4c8f6fc63 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -490,12 +490,12 @@ sub setPackages { _("Looking for available packages...")); install_any::setPackages($o, $rebuild_needed); + $w->set(_("Looking at packages already installed...")); + pkgs::selectPackagesAlreadyInstalled($o->{packages}, $o->{prefix}); + if ($rebuild_needed) { $w->set(_("Finding packages to upgrade...")); - pkgs::selectPackagesToUpgrade($o->{packages}, $o->{prefix}, $o->{base}, $o->{toRemove}, $o->{toSave}); - } else { - $w->set(_("Looking at packages already installed...")); - pkgs::selectPackagesAlreadyInstalled($o->{packages}, $o->{prefix}); + pkgs::selectPackagesToUpgrade($o->{packages}, $o->{prefix}); } } #------------------------------------------------------------------------------ |