From: mkanat%bugzilla.org <>
Date: Sun, 23 Dec 2007 11:43:44 +0000 (+0000)
Subject: Bug 409595: install-module.pl should shuffle the urllist for the CPAN mirrors
X-Git-Tag: bugzilla-3.1.3~420
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=46ecf5269c546707f091b0a7a98d1ef3914dc48c;p=thirdparty%2Fbugzilla.git

Bug 409595: install-module.pl should shuffle the urllist for the CPAN mirrors
Patch By Max Kanat-Alexander <mkanat@bugzilla.org> (module owner) a=mkanat
---

diff --git a/Bugzilla/Install/CPAN.pm b/Bugzilla/Install/CPAN.pm
index 01eceafebf..b37e6d40de 100644
--- a/Bugzilla/Install/CPAN.pm
+++ b/Bugzilla/Install/CPAN.pm
@@ -29,6 +29,7 @@ use Bugzilla::Install::Util qw(bin_loc install_string);
 use CPAN;
 use Cwd qw(abs_path);
 use File::Path qw(rmtree);
+use List::Util qw(shuffle);
 
 # We need the absolute path of ext_libpath, because CPAN chdirs around
 # and so we can't use a relative directory.
@@ -62,7 +63,7 @@ use constant CPAN_DEFAULTS => {
     unzip => bin_loc('unzip'),
     wget => bin_loc('wget'),
 
-    urllist => [qw(
+    urllist => [shuffle qw(
         http://cpan.pair.com/
         http://mirror.hiwaay.net/CPAN/
         ftp://ftp.dc.aleron.net/pub/CPAN/