From b03c0a60a78b91ce7011fa9e0dc6c334a6fde18a Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 24 Jun 2016 01:43:34 +0200 Subject: do display boot device list even if there's only one disk --- perl-install/any.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/any.pm b/perl-install/any.pm index 81511e680..a096df0e2 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -409,7 +409,7 @@ sub setupBootloader__general { { label => N("Bootloader"), title => 1 }, { label => N("Bootloader to use"), val => \$b->{method}, list => \@method_choices, format => \&bootloader::method2text }, - { label => N("Boot device"), val => \$b->{boot}, list => \@boot_devices, + { label => N("Boot device"), val => \$b->{boot}, list => \@boot_devices, allow_empty_list => 1, format => sub { $boot_devices{$_[0]} }, disabled => sub { is_uefi() } }, { label => N("Main options"), title => 1 }, { label => N("Delay before booting default image"), val => \$b->{timeout} }, -- cgit v1.2.1