summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-02-03 19:18:42 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-02-03 19:18:42 +0000
commit03bb21af0e9c25e7bb5d8719f1231d265663a364 (patch)
treeaaa50d8f380ae64365039a0bbc953f9dfe662cc8 /perl-install/any.pm
parent4fb359379d79b1adc17d6f94815ac08691a411d2 (diff)
downloaddrakx-backup-do-not-use-03bb21af0e9c25e7bb5d8719f1231d265663a364.tar
drakx-backup-do-not-use-03bb21af0e9c25e7bb5d8719f1231d265663a364.tar.gz
drakx-backup-do-not-use-03bb21af0e9c25e7bb5d8719f1231d265663a364.tar.bz2
drakx-backup-do-not-use-03bb21af0e9c25e7bb5d8719f1231d265663a364.tar.xz
drakx-backup-do-not-use-03bb21af0e9c25e7bb5d8719f1231d265663a364.zip
force a few more "list"s instead of "combo" boxes
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 471d0fbe0..6caeef9d7 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -158,7 +158,7 @@ sub setupBootloader {
$b->{vga} ||= 'normal';
if (arch !~ /ppc/) {
$in->ask_from('', _("Bootloader main options"), [
-{ label => _("Bootloader to use"), val => \$bootloader, list => [ keys(%bootloaders) ], format => \&translate },
+{ label => _("Bootloader to use"), val => \$bootloader, list => [ keys(%bootloaders) ], format => \&translate, type => 'list' },
arch() =~ /sparc/ ? (
{ label => _("Bootloader installation"), val => \$silo_install_lang, list => \@silo_install_lang },
) : if_(arch() !~ /ia64/,
@@ -190,7 +190,7 @@ sub setupBootloader {
} else {
$b->{boot} = $partition_table_mac::bootstrap_part;
$in->ask_from('', _("Bootloader main options"), [
- { label => _("Bootloader to use"), val => \$bootloader, list => [ keys(%bootloaders) ], format => \&translate },
+ { label => _("Bootloader to use"), val => \$bootloader, list => [ keys(%bootloaders) ], format => \&translate, type => 'list' },
{ label => _("Init Message"), val => \$b->{initmsg} },
{ label => _("Boot device"), val => \$b->{boot}, list => [ map { "/dev/$_" } (map { $_->{device} } (grep { isAppleBootstrap($_) } @$fstab))], not_edit => !$::expert },
{ label => _("Open Firmware Delay"), val => \$b->{delay} },