From 0e5a8d90c6e77256975baa394653d42172790fb3 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Fri, 8 Jun 2012 18:50:56 +0000
Subject: (_register_media_cfg) simplify using member()

---
 urpm/media.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/urpm/media.pm b/urpm/media.pm
index b972883a..ee5adf27 100644
--- a/urpm/media.pm
+++ b/urpm/media.pm
@@ -906,7 +906,7 @@ sub _register_media_cfg {
     if ($url) {
 	my $filename = $media_path . "/url";
 	my @urls = split(/\n/, scalar cat_($filename));
-	if (!grep { $url eq $_ } @urls) { 
+	if (!member($url, @urls)) { 
 	    append_to_file($filename, $url . "\n");
 	}
     }
@@ -917,7 +917,7 @@ sub _register_media_cfg {
 	}
 	my $filename = $media_path . "/mirrorlist";
 	my @mirrorlists = split(/\n/, scalar cat_($filename));
-	if (!grep { $mirrorlist eq $_ } @mirrorlists) { 
+	if (!member($mirrorlist, @mirrorlists)) { 
 	    append_to_file($filename, $mirrorlist . "\n");
 	}
     }
-- 
cgit v1.2.1