diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2005-08-10 04:16:46 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2005-08-10 04:16:46 +0000 |
commit | b61e311a78ee2eccb1ff7b0d08000a38b8b9f2d8 (patch) | |
tree | 643cde3eff94848eef7fd0ec4cd24e1d0ac7e5d1 /perl-install | |
parent | 2de042231cd290486a542cb8bb3b53e5f7340e4a (diff) | |
download | drakx-b61e311a78ee2eccb1ff7b0d08000a38b8b9f2d8.tar drakx-b61e311a78ee2eccb1ff7b0d08000a38b8b9f2d8.tar.gz drakx-b61e311a78ee2eccb1ff7b0d08000a38b8b9f2d8.tar.bz2 drakx-b61e311a78ee2eccb1ff7b0d08000a38b8b9f2d8.tar.xz drakx-b61e311a78ee2eccb1ff7b0d08000a38b8b9f2d8.zip |
be a little safer and shorter
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/do_pkgs.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/do_pkgs.pm b/perl-install/do_pkgs.pm index f155a5c84..cd0c4b40a 100644 --- a/perl-install/do_pkgs.pm +++ b/perl-install/do_pkgs.pm @@ -68,8 +68,7 @@ sub check_kernel_module_packages { my ($do, $base_name, $o_ext_name) = @_; require bootloader; - my ($short_name) = $base_name =~ /^(.*)-kernel$/; - my @rpms = $do->are_available("dkms-$short_name", + my @rpms = $do->are_available(if_($base_name =~ /^(.*)-kernel$/, "dkms-$1"), map { $base_name . '-' . bootloader::vmlinuz2version($_); } bootloader::installed_vmlinuz()); |