diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/NEWS | 3 | ||||
| -rw-r--r-- | perl-install/any.pm | 3 |
2 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index a7c10c485..b7a81080e 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,6 @@ +- drakboot: + o display partition labels in list instead of just disk names in "boot + device" choice - harddrake: fix missing names (mga#3745) Version 13.72.1 - 11 December 2011 diff --git a/perl-install/any.pm b/perl-install/any.pm index e9c614ca8..b43c41272 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -423,7 +423,8 @@ sub setupBootloader__general { foreach (bootloader::allowed_boot_parts($b, $all_hds)) { my $dev = "/dev/$_->{device}"; push @boot_devices, $dev; - $boot_devices{$dev} = $_->{info} ? "$dev ($_->{info})" : $dev; + my $name = $_->{info} || $_->{device_LABEL}; + $boot_devices{$dev} = $name ? "$dev ($name)" : $dev; } $in->ask_from_({ #messages => N("Bootloader main options"), |