summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorOlivier Blin <blino@mageia.org>2011-03-21 22:57:27 +0000
committerOlivier Blin <blino@mageia.org>2011-03-21 22:57:27 +0000
commit072bfac2f160c78b9348818d12c2c9d63276fe09 (patch)
treebd2da25785c91953ca5e979e80ed46af57c66290 /perl-install
parent5566a7df60feb430c3be5536008aef21098e4193 (diff)
downloaddrakx-072bfac2f160c78b9348818d12c2c9d63276fe09.tar
drakx-072bfac2f160c78b9348818d12c2c9d63276fe09.tar.gz
drakx-072bfac2f160c78b9348818d12c2c9d63276fe09.tar.bz2
drakx-072bfac2f160c78b9348818d12c2c9d63276fe09.tar.xz
drakx-072bfac2f160c78b9348818d12c2c9d63276fe09.zip
do not hardcode mirrors API path, use variables from product.id
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/mirror.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/mirror.pm b/perl-install/mirror.pm
index 0e5052d57..34c5abe0a 100644
--- a/perl-install/mirror.pm
+++ b/perl-install/mirror.pm
@@ -59,7 +59,7 @@ sub mirrors_raw {
#- contact the following URL to retrieve the list of mirrors.
#- http://wiki.mageia.org/en/Product_id
my $type = lc($product_id->{type}); $type =~ s/\s//g;
- my $list = "http://mirrors.mageia.org/api/mageia.cauldron.$product_id->{arch}.list";
+ my $list = "http://mirrors.mageia.org/api/$type.$product_id->{version}.$product_id->{arch}.list?product=$product_id->{product}";
log::explanations("trying mirror list from $list");
my @lines;
if ($::isInstall) {