diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2020-03-24 10:47:46 +0100 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2020-03-25 08:05:39 +0100 |
| commit | 55bc7ba0df2271059a114c6621c429ff96c44149 (patch) | |
| tree | 895ed88654eabdbed70f82bd5445cf0e53e8aba7 /perl-install/bootloader.pm | |
| parent | a7fffb36b7e374e33192a1f6b650f7451a713a54 (diff) | |
| download | drakx-55bc7ba0df2271059a114c6621c429ff96c44149.tar drakx-55bc7ba0df2271059a114c6621c429ff96c44149.tar.gz drakx-55bc7ba0df2271059a114c6621c429ff96c44149.tar.bz2 drakx-55bc7ba0df2271059a114c6621c429ff96c44149.tar.xz drakx-55bc7ba0df2271059a114c6621c429ff96c44149.zip | |
perl_checker cleanups + kill unused variable
Diffstat (limited to 'perl-install/bootloader.pm')
| -rw-r--r-- | perl-install/bootloader.pm | 5 |
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)); } } |