From 9ba356f4bf8d3f538fab80ac3246a9ef8f1b2f5c Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Fri, 30 Oct 2009 15:40:25 +0000 Subject: make sure we use long name when adding second kernel with same extension than preferred one --- perl-install/bootloader.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 83a9bada1..23dcbc097 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -899,8 +899,6 @@ sub get_kernel_labels { @kernels_str = (@$kernel_24, @$other); } - $kernels_str[0]{ext} = ''; - my %labels; foreach (@kernels_str) { if ($labels{$_->{ext}}) { @@ -909,6 +907,9 @@ sub get_kernel_labels { $labels{$_->{ext}} = 1; } } + + $kernels_str[0]{ext} = ''; + @kernels_str; } -- cgit v1.2.1