summaryrefslogtreecommitdiffstats
path: root/perl-install/share/list.alpha
Commit message (Expand)AuthorAgeFilesLines
* *** empty log message ***Pascal Rigaux2000-06-151-0/+1
* no_commentPascal Rigaux2000-02-241-0/+1
* no_commentPascal Rigaux2000-02-231-0/+2
* no_commentPascal Rigaux2000-02-181-2/+0
* no_commentPascal Rigaux2000-01-281-0/+1
* no_commentPascal Rigaux2000-01-271-68/+0
* *** empty log message ***Francois Pons2000-01-241-0/+71
/tr>
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} },