From 6ffec4be6a0cf15824a48f639d6fe2a32de9d508 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Wed, 1 Feb 2012 19:19:18 +0000
Subject:  (translate_why_removed_one) help perl_checker

---
 urpm/select.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'urpm/select.pm')

diff --git a/urpm/select.pm b/urpm/select.pm
index d6e7737b..958b4d0e 100644
--- a/urpm/select.pm
+++ b/urpm/select.pm
@@ -634,7 +634,7 @@ sub translate_why_removed_one {
     my ($from) = keys %$closure;
     my ($whyk) = keys %{$closure->{$from}};
     my $whyv = $closure->{$from}{$whyk};
-    my $frompkg = $urpm->search($from, strict_fullname => 1);
+    my $frompkg = $urpm->search($from, (strict_fullname => 1));
     my $s = do {
 	if ($whyk =~ /old_requested/) {
 	    N("in order to install %s", $frompkg ? scalar $frompkg->fullname : $from);
-- 
cgit v1.2.1