From eb368707588dd1720212524734e039fb0a509dd5 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Wed, 4 Apr 2001 13:44:55 +0000
Subject: added selectPackagesToUpgrade the first time choosePackages is
 called.

---
 perl-install/install2.pm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'perl-install/install2.pm')

diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index aa2f2b973..9be58979a 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -236,6 +236,7 @@ sub choosePackages {
 
     #- always setPackages as it may have to copy hdlist files and depslist file.
     $o->setPackages;
+    $o->selectPackagesToUpgrade if $o->{isUpgrade} && $_[1] == 1;
 
     $o->choosePackages($o->{packages}, $o->{compssUsers}, $_[1] == 1);
     log::l("compssUsersChoice's: ", join(" ", grep { $o->{compssUsersChoice}{$_} } keys %{$o->{compssUsersChoice}}));
-- 
cgit v1.2.1