From ada1534f6420d00de86437e57c921133c5c61ceb Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Tue, 27 Mar 2012 17:15:08 +0000
Subject: silent perl_checker

---
 urpmf | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'urpmf')

diff --git a/urpmf b/urpmf
index af1cdc10..a07a6066 100755
--- a/urpmf
+++ b/urpmf
@@ -260,7 +260,7 @@ my %needed_media_info = map { $_ => 1 } grep {
     int(grep { $usedtags{$_} } @$l);
 } keys %tags_per_media_info;
 
-my @needed_xml_info = map { s/xml_info__// ? $_ : () } keys %needed_media_info;
+my @needed_xml_info = map { s/xml_info__// ? $_ : @{[]} } keys %needed_media_info;
 if (@needed_xml_info > 1) {
     # we don't handle parallel parsing of xml files, default to hdlist
     $needed_media_info{hdlist} = 1;
-- 
cgit v1.2.1