ar71xx: add missing patch chunk to 4.1 unaligned access hacks

[openwrt/svn-archive/archive.git] / scripts / download.pl

diff --git a/scripts/download.pl b/scripts/download.pl
index d6a55b634c4ac58215433ac326dbc890ca06c05b..cd68a7bcd0cf4ade9caf82cf305e43ed155539d5 100755 (executable)
--- a/scripts/download.pl
+++ b/scripts/download.pl
@@ -40,6 +40,9 @@ sub localmirrors {
                close CONFIG;
        };
 
+       my $mirror = $ENV{'DOWNLOAD_MIRROR'};
+       $mirror and push @mlist, split(/;/, $mirror);
+
        return @mlist;
 }
 
@@ -157,6 +160,11 @@ foreach my $mirror (@ARGV) {
                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";
+       } elsif ($mirror =~ /^\@SAVANNAH\/(.+)$/) {
+               push @mirrors, "http://download.savannah.gnu.org/releases/$1";
+               push @mirrors, "http://nongnu.uib.no/$1";
+               push @mirrors, "http://ftp.igh.cnrs.fr/pub/nongnu/$1";
+               push @mirrors, "http://download-mirror.savannah.gnu.org/releases/$1";
        } elsif ($mirror =~ /^\@KERNEL\/(.+)$/) {
                my @extra = ( $1 );
                if ($filename =~ /linux-\d+\.\d+(?:\.\d+)?-rc/) {