summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_interactive.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-09-14 23:51:45 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-09-14 23:51:45 +0000
commit8d4516ae4290aeb3855804b1c74f4ae6fefe903e (patch)
treee90c865c44a791cce9f80e92f3a0c9ad51ceff48 /perl-install/install_steps_interactive.pm
parent816611491e0184792a6d481faed41557bfefb707 (diff)
downloaddrakx-backup-do-not-use-8d4516ae4290aeb3855804b1c74f4ae6fefe903e.tar
drakx-backup-do-not-use-8d4516ae4290aeb3855804b1c74f4ae6fefe903e.tar.gz
drakx-backup-do-not-use-8d4516ae4290aeb3855804b1c74f4ae6fefe903e.tar.bz2
drakx-backup-do-not-use-8d4516ae4290aeb3855804b1c74f4ae6fefe903e.tar.xz
drakx-backup-do-not-use-8d4516ae4290aeb3855804b1c74f4ae6fefe903e.zip
no_comment
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);
}