1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 |
| |
| committer | Pascal Rigaux <pixel@mandriva.com> | 1999-10-21 15:02:06 +0000 |
|---|---|---|
| commit | dfba999426e91786aa64e7938b4f7876a42ec6cf (patch) | |
| tree | 7f85eb5b594bb65655b89aecb32438d96addbcb9 /perl-install/install_steps_interactive.pm | |
| parent | 1a162cfa19a7030f0d273dcf02ef86b86713533b (diff) | |
| download | drakx-dfba999426e91786aa64e7938b4f7876a42ec6cf.tar drakx-dfba999426e91786aa64e7938b4f7876a42ec6cf.tar.gz drakx-dfba999426e91786aa64e7938b4f7876a42ec6cf.tar.bz2 drakx-dfba999426e91786aa64e7938b4f7876a42ec6cf.tar.xz drakx-dfba999426e91786aa64e7938b4f7876a42ec6cf.zip | |
*** empty log message ***
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 6 |
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."), |