summaryrefslogtreecommitdiffstats
path: root/urpm/cfg.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-06-08 18:51:03 +0000
committerThierry Vignaud <tv@mageia.org>2012-06-08 18:51:03 +0000
commite156b1ce366fb2c05298731a3ba4ceb905e88738 (patch)
tree27605629ea67de4bd93b676f7a247ab72c9aa9f4 /urpm/cfg.pm
parentb7e56b30b8c4801b1d4d4a47c71d92de0e7bc438 (diff)
downloadurpmi-e156b1ce366fb2c05298731a3ba4ceb905e88738.tar
urpmi-e156b1ce366fb2c05298731a3ba4ceb905e88738.tar.gz
urpmi-e156b1ce366fb2c05298731a3ba4ceb905e88738.tar.bz2
urpmi-e156b1ce366fb2c05298731a3ba4ceb905e88738.tar.xz
urpmi-e156b1ce366fb2c05298731a3ba4ceb905e88738.zip
use newly introduced any()
Diffstat (limited to 'urpm/cfg.pm')
-rw-r--r--urpm/cfg.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/urpm/cfg.pm b/urpm/cfg.pm
index 5e002b0d..2bd90633 100644
--- a/urpm/cfg.pm
+++ b/urpm/cfg.pm
@@ -136,7 +136,7 @@ sub load_config_raw {
} elsif (/^(.*?[^\\])\s+(?:(.*?[^\\])\s+)?{$/) {
#- medium definition
my ($name, $url) = (unquotespace($1), unquotespace($2));
- if (grep { $_->{name} eq $name } @blocks) {
+ if (any { $_->{name} eq $name } @blocks) {
#- hmm, somebody fudged urpmi.cfg by hand.
$err = N("medium `%s' is defined twice, aborting", $name);
return;