[Xen-devel] [OSSTEST PATCH 1/5] ts-debian-install: Honour DebianMirrorProxy, HttpProxy

[Ian Jackson <ian.jackson@xxxxxxxxxxxxx>]

Signed-off-by: Ian Jackson <ian.jackson@xxxxxxxxxxxxx>
---
 ts-debian-install |    9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/ts-debian-install b/ts-debian-install
index fcef827..0dfe40c 100755
--- a/ts-debian-install
+++ b/ts-debian-install
@@ -76,7 +76,12 @@ sub ginstall () {
             fi
 END
     }
-    target_cmd_root($ho, <<END, 2000);
+    my $cmd = '';
+    my $useproxy = $c{DebianMirrorProxy} // $c{HttpProxy};
+    $cmd .= <<END if defined $useproxy;
+        http_proxy=$useproxy \\
+END
+    $cmd .= <<END;
         xen-create-image \\
             --dhcp --mac $gho->{Ether} \\
             --memory ${ram_mb}Mb --swap ${swap_mb}Mb \\
@@ -89,6 +94,8 @@ END
             $initrd_opt \\
             $archarg
 END
+    target_cmd_root($ho, $cmd, 2000);
+
     my $cfg= "/etc/xen/$gho->{Name}.cfg";
     store_runvar("$gho->{Guest}_cfgpath", $cfg);
     store_runvar("$gho->{Guest}_swap_lv", "$gho->{Name}-swap");
-- 
1.7.10.4


_______________________________________________
Xen-devel mailing list
Xen-devel@xxxxxxxxxxxxx
http://lists.xen.org/xen-devel