diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-09-26 19:12:13 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-09-26 19:12:13 +0000 |
commit | e18bb6cc843623a26ca3003c4aec6970c6127d04 (patch) | |
tree | 08946f2c05b5fb1817813dce77affb2707320574 | |
parent | b2bc4ad0a80f21f0b654d1bf8543d6ef449b4fd7 (diff) | |
download | perl-URPM-e18bb6cc843623a26ca3003c4aec6970c6127d04.tar perl-URPM-e18bb6cc843623a26ca3003c4aec6970c6127d04.tar.gz perl-URPM-e18bb6cc843623a26ca3003c4aec6970c6127d04.tar.bz2 perl-URPM-e18bb6cc843623a26ca3003c4aec6970c6127d04.tar.xz perl-URPM-e18bb6cc843623a26ca3003c4aec6970c6127d04.zip |
(_find_required_package__kmod) simplify
-rw-r--r-- | URPM/Resolve.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm index 1816cf3..a168c1b 100644 --- a/URPM/Resolve.pm +++ b/URPM/Resolve.pm @@ -359,7 +359,7 @@ sub _find_required_package__kmod { $choices->[0]->name =~ /^dkms-|-kernel-\d\./ or return; grep { - if (my ($_name, $version, $flavor, $release) = $_->name =~ /(.*)-kernel-(\d\..*)-(.*)-(.*)/) { + if (my ($version, $flavor, $release) = $_->name =~ /(:?.*)-kernel-(\d\..*)-(.*)-(.*)/) { my $kernel = "kernel-$flavor-$version-$release"; _is_selected_or_installed($urpm, $db, $kernel); } elsif ($_->name =~ /^dkms-/) { |