Anonymous

Index: scripts/download.pl
===================================================================
--- scripts/download.pl	(Revision 687)
+++ scripts/download.pl	(Working copy)
@@ -2,6 +2,7 @@
 use strict;
 use warnings;
 
+my @LOCAL_SITES = ( "http://localhost/sources" );
 my $target = shift @ARGV;
 my $filename = shift @ARGV;
 my $md5sum = shift @ARGV;
@@ -54,7 +55,7 @@
 	unlink "$target/$filename.md5sum";
 }
 
-foreach my $mirror (@ARGV) {
+foreach my $mirror (@LOCAL_SITES, @ARGV) {
 	if ($mirror =~ /^\@SF\/(.+)$/) {
 		my $sfpath = $1;
 		open SF, "wget -t1 -q -O- 'http://prdownloads.sourceforge.net/$sfpath/$filename' |";