diff options
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 22 |
1 files changed, 12 insertions, 10 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index d44fcb69b..557215229 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -521,16 +521,18 @@ sub setupBootloader($) { lilo::proposition($o->{hds}, $o->{fstab}); - my @entries = grep { $_->{liloLabel} } @{$o->{fstab}}; - - $o->ask_from_entries_ref('', - _("The boot manager Mandrake uses can boot other - operating systems as well. You need to tell me - what partitions you would like to be able to boot - and what label you want to use for each of them."), - [map {"$_->{device}" . type2name($_->{type})} @entries], - [map {\$_->{liloLabel}} @entries], - ); + unless ($::beginner) { + my @entries = grep { $_->{liloLabel} } @{$o->{fstab}}; + + $o->ask_from_entries_ref('', +_("The boot manager Mandrake uses can boot other +operating systems as well. You need to tell me +what partitions you would like to be able to boot +and what label you want to use for each of them."), + [map {"$_->{device}" . type2name($_->{type})} @entries], + [map {\$_->{liloLabel}} @entries], + ); + } install_steps::setupBootloader($o); } |