From 2249f8c990a910f3a74a753d1ef4691c24ab0397 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 17 Aug 2004 09:04:12 +0000 Subject: - fix short label with extension. eg: have "linux-smp" instead of "linuxsmp" - this fixes choosing the default specialised kernel --- perl-install/bootloader.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 86ce3d291..bbe956849 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -89,7 +89,7 @@ sub kernel_str2label { my $base = $kernel->{basename} eq 'vmlinuz' ? 'linux' : $kernel->{basename}; $o_use_long_name || $kernel->{use_long_name} ? sanitize_ver("$base-$kernel->{version}") : - $kernel->{ext} ? "$base$kernel->{ext}" : $base; + $kernel->{ext} ? "$base-$kernel->{ext}" : $base; } sub get { -- cgit v1.2.1