diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-09-01 21:10:35 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-09-01 21:10:35 +0000 |
| commit | 863a0345a2f895d35046f35d97f473e825906687 (patch) | |
| tree | e04cae4c0cfa6b0e481cae4d976ecb32c30e6dea /perl-install/install_steps_interactive.pm | |
| parent | 608738174ef563cd88f95f53683f73f316b8f552 (diff) | |
| download | drakx-backup-do-not-use-863a0345a2f895d35046f35d97f473e825906687.tar drakx-backup-do-not-use-863a0345a2f895d35046f35d97f473e825906687.tar.gz drakx-backup-do-not-use-863a0345a2f895d35046f35d97f473e825906687.tar.bz2 drakx-backup-do-not-use-863a0345a2f895d35046f35d97f473e825906687.tar.xz drakx-backup-do-not-use-863a0345a2f895d35046f35d97f473e825906687.zip | |
no_comment
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 6 |
1 files changed, 5 insertions, 1 deletions
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($_) => |