diff options
author | Francois Pons <fpons@mandriva.com> | 2002-08-09 17:17:03 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2002-08-09 17:17:03 +0000 |
commit | 16081dbe0b2a41c9eb00fec7a566c17d0721a81e (patch) | |
tree | 6ab27cf1dc84e4ff1ad0d8b183a87aca4660baa3 /perl-install | |
parent | dab6d6e717d45a27dc325c400db9b03d71ac6063 (diff) | |
download | drakx-16081dbe0b2a41c9eb00fec7a566c17d0721a81e.tar drakx-16081dbe0b2a41c9eb00fec7a566c17d0721a81e.tar.gz drakx-16081dbe0b2a41c9eb00fec7a566c17d0721a81e.tar.bz2 drakx-16081dbe0b2a41c9eb00fec7a566c17d0721a81e.tar.xz drakx-16081dbe0b2a41c9eb00fec7a566c17d0721a81e.zip |
make sure size of packages is computed.
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install_steps.pm | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 1d19588b5..4283e51a4 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -252,11 +252,8 @@ sub setPackages { my ($o, $rebuild_needed) = @_; install_any::setPackages($o, $rebuild_needed); - if ($rebuild_needed) { - pkgs::selectPackagesToUpgrade($o->{packages}, $o->{prefix}, $o->{base}, $o->{toRemove}, $o->{toSave}); - } else { - pkgs::selectPackagesAlreadyInstalled($o->{packages}, $o->{prefix}); - } + pkgs::selectPackagesAlreadyInstalled($o->{packages}, $o->{prefix}); + $rebuild_needed and pkgs::selectPackagesToUpgrade($o->{packages}, $o->{prefix}, $o->{base}, $o->{toRemove}, $o->{toSave}); } sub choosePackages { |