diff options
Diffstat (limited to 'perl-install/bootloader.pm')
| -rw-r--r-- | perl-install/bootloader.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index f1e3f4fb8..23331d1b2 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -1178,7 +1178,7 @@ sub suggest { } my @kernels = get_kernels_and_labels() or die "no kernel installed"; - log::l("found kernels: ", join(', ', @kernels)); + log::l("found kernels: ", join(', ', map { $_->{version} } @kernels)); my %old_kernels = map { vmlinuz2version($_->{kernel_or_dev}) => 1 } @{$bootloader->{entries}}; @kernels = grep { !$old_kernels{$_->{version}} } @kernels; |