summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-10-21 15:02:06 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-10-21 15:02:06 +0000
commitdfba999426e91786aa64e7938b4f7876a42ec6cf (patch)
tree7f85eb5b594bb65655b89aecb32438d96addbcb9 /perl-install
parent1a162cfa19a7030f0d273dcf02ef86b86713533b (diff)
downloaddrakx-backup-do-not-use-dfba999426e91786aa64e7938b4f7876a42ec6cf.tar
drakx-backup-do-not-use-dfba999426e91786aa64e7938b4f7876a42ec6cf.tar.gz
drakx-backup-do-not-use-dfba999426e91786aa64e7938b4f7876a42ec6cf.tar.bz2
drakx-backup-do-not-use-dfba999426e91786aa64e7938b4f7876a42ec6cf.tar.xz
drakx-backup-do-not-use-dfba999426e91786aa64e7938b4f7876a42ec6cf.zip
*** empty log message ***
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps_interactive.pm6
1 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 0d9db4ae9..1d12eed53 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -599,7 +599,9 @@ sub setupBootloader {
my ($o, $more) = @_;
my $b = $o->{bootloader};
- if ($::beginner && $more == ($b->{bootUnsafe} ? 0 : 1)) {
+ $more++ if $b->{bootUnsafe};
+
+ if ($::beginner && $more == 1) {
my @l = (__("First sector of drive (MBR)"), __("First sector of boot partition"));
my $boot = $o->{hds}[0]{device};
@@ -634,7 +636,7 @@ _("Restrict command line options") => { val => \$b->{restricted}, type => "bool"
$b->{vga} = $lilo::vga_modes{$b->{vga}} || $b->{vga};
}
- until ($::beginner && !$more) {
+ until ($::beginner && $more <= 1) {
my $c = $o->ask_from_list_('',
_("Here are the following entries in LILO.
You can add some more or change the existent ones."),