summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-08-10 04:16:46 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-08-10 04:16:46 +0000
commitb61e311a78ee2eccb1ff7b0d08000a38b8b9f2d8 (patch)
tree643cde3eff94848eef7fd0ec4cd24e1d0ac7e5d1 /perl-install
parent2de042231cd290486a542cb8bb3b53e5f7340e4a (diff)
downloaddrakx-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.pm3
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());