From 7bd3d9d1fe0788ee93f9a6f4a005e0d945073a6a Mon Sep 17 00:00:00 2001
From: Martin Whitaker <mageia@martin-whitaker.me.uk>
Date: Wed, 30 Nov 2022 15:05:13 +0000
Subject: mirror: use https URL for fetching the mirror list.

---
 perl-install/mirror.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/mirror.pm b/perl-install/mirror.pm
index 0e61bc174..11d55f06b 100644
--- a/perl-install/mirror.pm
+++ b/perl-install/mirror.pm
@@ -80,8 +80,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;
-    #- FIXME! (blino) we use use https here
-    my $list = "http://mirrors.mageia.org/api/$type.$product_id->{version}.$product_id->{arch}.list?product=$product_id->{product}";
+    my $list = "https://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 = $::isInstall ? _mirrors_raw_install($list) : _mirrors_raw_standalone($list);
     map { common::parse_LDAP_namespace_structure(chomp_($_)) } @lines;
-- 
cgit v1.2.1