From 2249f8c990a910f3a74a753d1ef4691c24ab0397 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
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(-)

(limited to 'perl-install/bootloader.pm')

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