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 01eceafebf9b582e553bf5d8a1d782e977e0c126..b37e6d40de25bfefc1ed1920cf913b53d67b8e19 100644 (file)
--- 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/