From 8480c37c1c52378c93cb1a5be52fb8d4c5d8a4de Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Tue, 16 Sep 2003 10:58:15 +0000 Subject: added automatic steps in recovery mode. --- perl-install/install2.pm | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'perl-install/install2.pm') diff --git a/perl-install/install2.pm b/perl-install/install2.pm index 310908689..522158455 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -569,6 +569,10 @@ sub main { $o->{compssListLevel} = 4; push @auto, 'selectInstallClass', 'doPartitionDisks', 'choosePackages', 'configureTimezone', 'exitInstall'; } + if ($::recovery) { + $o->{partitioning}{use_existing_root} = 1; + push @auto, 'selectLanguage', 'selectInstallClass', 'doPartitionDisks', 'formatPartitions'; + } foreach (@auto) { my $s = $o->{steps}{/::(.*)/ ? $1 : $_} or next; -- cgit v1.2.1