From 46ecf5269c546707f091b0a7a98d1ef3914dc48c Mon Sep 17 00:00:00 2001
From: "mkanat%bugzilla.org" <>
Date: Sun, 23 Dec 2007 11:43:44 +0000
Subject: 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

---
 Bugzilla/Install/CPAN.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'Bugzilla')

diff --git a/Bugzilla/Install/CPAN.pm b/Bugzilla/Install/CPAN.pm
index 01eceafeb..b37e6d40d 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/
-- 
cgit v1.2.3-24-g4f1b