r2417 - packages/tarballs

[Eddy Petrisor]

Author: eddyp-guest
Date: 2007-02-16 03:03:39 +0100 (Fri, 16 Feb 2007)
New Revision: 2417

Modified:
   packages/tarballs/getsources.sh
Log:
allow customisations and be smart about the prefered mirror

Modified: packages/tarballs/getsources.sh
===================================================================
--- packages/tarballs/getsources.sh	2007-02-15 14:22:51 UTC (rev 2416)
+++ packages/tarballs/getsources.sh	2007-02-16 02:03:39 UTC (rev 2417)
@@ -5,7 +5,7 @@
 #set -e
 
 cd "$(dirname $0)"
-DEBIANMIRROR="ftp.fr.debian.org"
+[ -z "$DEBIANMIRROR" ] && DEBIANMIRROR=$(grep -E '^deb\ (ht|f)tp' /etc/apt/sources.list| head -n 1 | sed 's;^deb.*p://\([^/]*\)/debian.*;\1;')
 
 #SOURCES=$(find ../trunk -wholename '*debian/control' -exec sed -ne 's/Source: //p' '{}' ';' | sort | uniq)
 SOURCES=$(find ../trunk -regex '.*debian\/control' -exec sed -ne 's/Source: //p' '{}' ';' | sort | uniq)