From 66652a5f27e8755204ab3d9cf2ffa2e4ab0f8aba Mon Sep 17 00:00:00 2001
From: Anne Nicolas <ennael@mageia.org>
Date: Sat, 12 Mar 2011 13:04:11 +0000
Subject: integrate mirror.pn patch

---
 perl-install/Makefile.config | 2 +-
 perl-install/mirror.pm       | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl-install/Makefile.config b/perl-install/Makefile.config
index a5db40c49..ffa4d1b4c 100644
--- a/perl-install/Makefile.config
+++ b/perl-install/Makefile.config
@@ -1,5 +1,5 @@
 # -*- Makefile -*-
-VERSION:=13.43
+VERSION:=13.44
 
 SUDO        = sudo
 TMPDIR      = /tmp
diff --git a/perl-install/mirror.pm b/perl-install/mirror.pm
index de1638e26..0e5052d57 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 = "https://api.mageia.org/mirrors/$type.$product_id->{version}.$product_id->{arch}.list?product=$product_id->{product}";
+    my $list = "http://mirrors.mageia.org/api/mageia.cauldron.$product_id->{arch}.list";
     log::explanations("trying mirror list from $list");
     my @lines;
     if ($::isInstall) {
-- 
cgit v1.2.1