From 863a0345a2f895d35046f35d97f473e825906687 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 1 Sep 2000 21:10:35 +0000
Subject: no_comment

---
 perl-install/install_steps_interactive.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

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

diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index ee35a5282..c7657b187 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -129,7 +129,7 @@ are you ready to answer that kind of questions?"),
 
     $o->{isUpgrade} = $o->selectInstallClass1($verifInstallClass,
 					      first(list2kv(@c)), ${{reverse %c}}{$::beginner ? "beginner" : $::expert ? "expert" : "specific"},
-					      [ __("Install"), __("Upgrade") ], $o->{isUpgrade} ? "Upgrade" : "Install") eq "Upgrade";
+					      [ __("Install"), __("Rescue") ], $o->{isUpgrade} ? "Rescue" : "Install") eq "Rescue";
 
     if ($::corporate || $::beginner) {
 	delete $o->{installClass};
@@ -194,10 +194,14 @@ sub ask_mntpoint_s {
     @fstab = @$fstab if @fstab == 0;
     die _("no available partitions") if @fstab == 0;
 
+
     if (@fstab == 1) {
 	$fstab[0]{mntpoint} = '/';
     } else {
 	install_any::suggest_mount_points($o->{hds}, $o->{prefix}, 'uniq');
+
+	log::l("default mntpoint $_->{mntpoint}") foreach @fstab;
+
 	$o->ask_from_entries_refH('', 
 				  _("Choose the mount points"),
 				  [ map { partition_table_raw::description($_) => 
-- 
cgit v1.2.1