From 73181bdd43f1e830273bf8fc14850c7a46f6fe43 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Tue, 16 Jul 2002 10:03:21 +0000
Subject: fixed reference to step 'selectPackagesToUpgrade'.

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

diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index 38fdf4b52..1659cd644 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -136,8 +136,7 @@ sub selectInstallClass {
     installStepsCall($o, $auto, 'selectInstallClass', $clicked);
 
     if ($o->{steps}{choosePackages}{entered} >= 1 && !$o->{steps}{installPackages}{done}) {
-	installStepsCall($o, $auto, 'setPackages');
-	installStepsCall($o, $auto, 'selectPackagesToUpgrade') if $o->{isUpgrade};
+	installStepsCall($o, $auto, 'setPackages', $o->{isUpgrade} && $ent_number == 1);
     }
     if ($o->{isUpgrade}) {
 	@{$o->{orderedSteps}} = map { /setupSCSI/ ? ($_, "doPartitionDisks") : $_ }
-- 
cgit v1.2.1