From 8ec122193e959c00f4f3d673f0966f0a27a5803d Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Fri, 16 Mar 2012 20:11:47 +0000
Subject: (find_required_package) perl_checker cleanup

---
 URPM/Resolve.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm
index 40e32a0..0d8b37c 100644
--- a/URPM/Resolve.pm
+++ b/URPM/Resolve.pm
@@ -218,7 +218,7 @@ sub find_required_package {
 	    $may_add_to_packages->($pkg);
 	} elsif (my $name = property2name($_)) {
 	    my $property = $_;
-	    foreach (sort {$a <=> $b} keys %{$urpm->{provides}{$name} || {}}) {
+	    foreach (sort { $a <=> $b } keys %{$urpm->{provides}{$name} || {}}) {
 		my $pkg = $urpm->{depslist}[$_];
 		$pkg->is_arch_compat or next;
 		$pkg->flag_skip || $state->{rejected}{$pkg->fullname} and next;
-- 
cgit v1.2.1