summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_interactive.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r--perl-install/install_steps_interactive.pm22
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);
}