# HG changeset patch
# User "Yann E. MORIN" <yann.morin.1998@anciens.enib.fr>
# Date 1233407718 0
# Node ID 619019337eadfce920ef388f7a9f817b9625f556
# Parent  41a84f7d3b4f87f159eb76676e408fb7b5b486a5
Fix downloading with CT_GetFile when no mirror is set.

 /trunk/scripts/functions |    8     5     3     0 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff -r 41a84f7d3b4f -r 619019337ead scripts/functions
--- a/scripts/functions	Sat Jan 31 11:29:50 2009 +0000
+++ b/scripts/functions	Sat Jan 31 13:15:18 2009 +0000
@@ -478,7 +478,7 @@
 # Usage: CT_GetFile <basename> [.extension] <url> [url ...]
 CT_GetFile() {
     local ext
-    local url
+    local url URLS LAN_URLS
     local file="$1"
     local first_ext
     shift
@@ -501,6 +501,8 @@
     CT_DoLog EXTRA "Retrieving '${file}'"
     CT_Pushd "${CT_TARBALLS_DIR}"
 
+    URLS="$@"
+
     # Add URLs on the LAN mirror
     LAN_URLS=
     if [ "${CT_USE_MIRROR}" = "y" ]; then
@@ -511,10 +513,10 @@
 
         if [ "${CT_PREFER_MIRROR}" = "y" ]; then
             CT_DoLog DEBUG "Pre-pending LAN mirror URLs"
-            URLS="${LAN_URLS} ${@}"
+            URLS="${LAN_URLS} ${URLS}"
         else
             CT_DoLog DEBUG "Appending LAN mirror URLs"
-            URLS="${@} ${LAN_URLS}"
+            URLS="${URLS} ${LAN_URLS}"
         fi
     fi