diff options
| author | Christophe Fergeau <cfergeau@mandriva.com> | 2009-09-01 08:41:42 +0000 |
|---|---|---|
| committer | Christophe Fergeau <cfergeau@mandriva.com> | 2009-09-01 08:41:42 +0000 |
| commit | 25b5a1b9c893b4c46cd89a3e4d445a994aff05ca (patch) | |
| tree | 7871bb7120f38042bbd604ad7648c923609f0a91 /perl-install/mirror.pm | |
| parent | 62f7d54e35f2d074f70f5f879db5979f6dbf0dad (diff) | |
| download | drakx-25b5a1b9c893b4c46cd89a3e4d445a994aff05ca.tar drakx-25b5a1b9c893b4c46cd89a3e4d445a994aff05ca.tar.gz drakx-25b5a1b9c893b4c46cd89a3e4d445a994aff05ca.tar.bz2 drakx-25b5a1b9c893b4c46cd89a3e4d445a994aff05ca.tar.xz drakx-25b5a1b9c893b4c46cd89a3e4d445a994aff05ca.zip | |
use https to download the mirrorlist from api.mandriva.com
Diffstat (limited to 'perl-install/mirror.pm')
| -rw-r--r-- | perl-install/mirror.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/mirror.pm b/perl-install/mirror.pm index a37955669..563464874 100644 --- a/perl-install/mirror.pm +++ b/perl-install/mirror.pm @@ -59,12 +59,12 @@ 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?product=$product_id->{product}"; + my $list = "https://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) { require install::http; - my $f = install::http::getFile($list) or die "mirror list not found"; + my $f = install::http::getFile($list, "strict-certificate-check" => 1) or die "mirror list not found"; local $SIG{ALRM} = sub { die "timeout" }; alarm 60; log::l("using mirror list $list"); |