1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 3204aa194..5d6714b0e 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -150,8 +150,7 @@ sub kernel_str2initrd_short {
 	basename2initrd_basename(kernel_str2short_name($kernel)) . '.img';
     }
 }
-sub kernel_str2liblinux_short {
-    my ($kernel) = @_;
+sub kernel_str2liblinux_short() {
     $liblinux_path;
 }
 
@@ -1055,7 +1054,7 @@ sub add_kernel {
 	}
 
 	if ($v->{liblinux}) {
-	    $v->{liblinux} = kernel_str2liblinux_short($kernel_str);
+	    $v->{liblinux} = kernel_str2liblinux_short();
 	    _do_the_symlink($bootloader, $v->{liblinux}, basename($liblinux_long));
 	}
     }