From e156b1ce366fb2c05298731a3ba4ceb905e88738 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Fri, 8 Jun 2012 18:51:03 +0000
Subject: use newly introduced any()

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

(limited to 'urpm/signature.pm')

diff --git a/urpm/signature.pm b/urpm/signature.pm
index 6272dfac..235867bf 100644
--- a/urpm/signature.pm
+++ b/urpm/signature.pm
@@ -53,7 +53,7 @@ sub _check {
 		my $invalid_ids = 0;
 
 		foreach my $key_id ($verif =~ /(?:key id \w{8}|#)(\w+)/gi) {
-		    if (grep { hex($_) == hex($key_id) } split /[,\s]+/, $key_ids) {
+		    if (any { hex($_) == hex($key_id) } split /[,\s]+/, $key_ids) {
 			++$valid_ids;
 		    } else {
 			++$invalid_ids;
-- 
cgit v1.2.1