github.com/xen-tools.xen-tools
1
0
Fork 0
mirror of synced 2026-01-22 02:05:22 +00:00
Code Releases Activity

2007-03-01 10:17:50 by steve

Browse Source 
Commit the correct core.
This commit is contained in:
steve 2007-03-01 10:17:50 +00:00
parent cbb439020e
commit 2c772ad9f6
1 changed files with 13 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
bin/xt-install-image
View File

@ -80,7 +80,7 @@ Untar a .tar file into the new installation location. This tarfile is assumed t
--
http://www.steve.org.uk/
$Id: xt-install-image,v 1.50 2007-03-01 10:12:59 steve Exp $
$Id: xt-install-image,v 1.51 2007-03-01 10:17:50 steve Exp $
=cut
@ -414,7 +414,7 @@ sub parseCommandLineArguments
if ( $VERSION )
{
my $REVISION = '$Revision: 1.50 $';
my $REVISION = '$Revision: 1.51 $';
if ( $REVISION =~ /1.([0-9.]+) / )
{
$REVISION = $1;
@ -779,7 +779,17 @@ sub do_image_server
#
my $request = $CONFIG{'install-source'} . "/create.cgi?submit=1";
foreach my $k ( keys %ENV )
#
# Some parameters are hard-wired.
#
$request .= "&arch=xen";
$request .= "&root_device=/dev/sda";
$request .= "&ip1=" . $ENV{'ip'};
#
# We only care about some keys
#
foreach my $k ( qw/ dhcp broadcast gateway hostname netmask / )
{
# Skip values which aren't defined.
next unless defined $ENV{$k};