diff options
-rw-r--r-- | perl-install/NEWS | 2 | ||||
-rw-r--r-- | perl-install/install/NEWS | 2 | ||||
-rw-r--r-- | perl-install/mirror.pm | 2 |
3 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 653602c28..fd4fad1d9 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,5 @@ +- add product type to URL when fetching mirror list + Version 11.5 - 6 August 2008 - fix more strange focus bugs diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 1223dfb60..a1759f064 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,3 +1,5 @@ +- add product type to URL when fetching mirror list + Version 11.3 - 4 August 2008 - fix spacing around buttons diff --git a/perl-install/mirror.pm b/perl-install/mirror.pm index d725429f2..a37955669 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.mandriva.com/en/Product_id my $type = lc($product_id->{type}); $type =~ s/\s//g; - my $list = "http://api.mandriva.com/mirrors/$type.$product_id->{version}.$product_id->{arch}.list"; + my $list = "http://api.mandriva.com/mirrors/$type.$product_id->{version}.$product_id->{arch}.list?product=$product_id->{product}"; log::explanations("trying mirror list from $list"); my @lines; if ($::isInstall) { |