scripts/download.pl: prefer the GNU mirror redirect over the primary site (#14603)

Signed-off-by: Felix Fietkau <nbd@openwrt.org>
SVN-Revision: 39045

diff --git a/scripts/download.pl b/scripts/download.pl
index f17500f3c18bb768b6fbfb1434cdc34939b5bcb6..d6a55b634c4ac58215433ac326dbc890ca06c05b 100755 (executable)
--- a/scripts/download.pl
+++ b/scripts/download.pl
@@ -152,8 +152,8 @@ foreach my $mirror (@ARGV) {
                        push @mirrors, "http://downloads.sourceforge.net/$1";
                }
        } elsif ($mirror =~ /^\@GNU\/(.+)$/) {
                        push @mirrors, "http://downloads.sourceforge.net/$1";
                }
        } elsif ($mirror =~ /^\@GNU\/(.+)$/) {

-               push @mirrors, "http://ftp.gnu.org/pub/gnu/$1";

                push @mirrors, "http://ftpmirror.gnu.org/$1";
                push @mirrors, "http://ftpmirror.gnu.org/$1";

+               push @mirrors, "http://ftp.gnu.org/pub/gnu/$1";

                push @mirrors, "ftp://ftp.belnet.be/mirror/ftp.gnu.org/gnu/$1";
                push @mirrors, "ftp://ftp.mirror.nl/pub/mirror/gnu/$1";
                push @mirrors, "http://mirror.switch.ch/ftp/mirror/gnu/$1";
                push @mirrors, "ftp://ftp.belnet.be/mirror/ftp.gnu.org/gnu/$1";
                push @mirrors, "ftp://ftp.mirror.nl/pub/mirror/gnu/$1";
                push @mirrors, "http://mirror.switch.ch/ftp/mirror/gnu/$1";