diff options
| author | Olivier Blin <blino@mageia.org> | 2011-03-21 22:57:27 +0000 |
|---|---|---|
| committer | Olivier Blin <blino@mageia.org> | 2011-03-21 22:57:27 +0000 |
| commit | 072bfac2f160c78b9348818d12c2c9d63276fe09 (patch) | |
| tree | bd2da25785c91953ca5e979e80ed46af57c66290 /perl-install/mirror.pm | |
| parent | 5566a7df60feb430c3be5536008aef21098e4193 (diff) | |
| download | drakx-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/mirror.pm')
| -rw-r--r-- | perl-install/mirror.pm | 2 |
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) { |