From 6464e06a167852a46ee51a27badb635415a56539 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Mon, 7 Jan 2002 18:22:59 +0000
Subject: added option to only upgrade packages.

---
 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 f0ec6960d..bde969d1e 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -141,6 +141,7 @@ sub selectInstallClass {
     if ($o->{isUpgrade}) {
 	@{$o->{orderedSteps}} = map { /setupSCSI/ ? ($_, "doPartitionDisks") : $_ }
 	                        grep { !/doPartitionDisks/ } @{$o->{orderedSteps}};
+	$o->{keepConfiguration} and @{$o->{orderedSteps}} = grep { !/selectMouse|selectKeyboard|miscellaneous|setRootPassword|addUser|configureNetwork|installUpdates|summary|configureServices|configureX/ } @{$o->{orderedSteps}};
 	my $s; foreach (@{$o->{orderedSteps}}) {
 	    $s->{next} = $_ if $s;
 	    $s = $o->{steps}{$_};
-- 
cgit v1.2.1