1
0
mirror of synced 2026-02-22 22:57:23 +00:00

2006-09-10 21:04:20 by steve

Updated soley to allow tests to complete.
This commit is contained in:
steve
2006-09-10 21:04:20 +00:00
parent de0754e17e
commit 279d8e74da
2 changed files with 12 additions and 5 deletions

View File

@@ -79,6 +79,9 @@ xen-create-image - Easily create new Xen instances with networking and OpenSSH.
this is assumed to be a previously installed system.
This is much faster than installing from scratch.
--copy-cmd This allows you to specify the command actually used for
installation when using "--copy"
--dist Specify the distribution you wish to install.
--debootstrap Use debootstrap to install the guest system.
@@ -95,6 +98,9 @@ xen-create-image - Easily create new Xen instances with networking and OpenSSH.
Similar to --copy this is signficantly faster than
installing via rpmstrap or debootstrap.
--tar-cmd This allows you to specify the command actually used for
installation when using "--tar".
--template Specify which template file to use when creating the
Xen configuration file.
@@ -454,7 +460,7 @@ Install an X11 server, using VNC and XDM
--
http://www.steve.org.uk/
$Id: xen-create-image,v 1.92 2006-09-10 18:22:42 steve Exp $
$Id: xen-create-image,v 1.93 2006-09-10 21:04:20 steve Exp $
=cut
@@ -774,7 +780,6 @@ sub setupDefaultOptions
$CONFIG{'copy'} = '';
$CONFIG{'tar'} = '';
#
# The program to run to create a filesystem.
#
@@ -930,9 +935,11 @@ sub parseCommandLineArguments
# NOTE: We set the local variable here, not the global.
#
"copy=s", \$install{'copy'},
"copy-cmd=s", \$CONFIG{'copy-cmd'}, # NOP - IGNORED.
"debootstrap", \$install{'debootstrap'},
"rpmstrap", \$install{'rpmstrap'},
"tar=s", \$install{'tar'},
"tar-cmd=s", \$CONFIG{'tar-cmd'}, # NOP - IGNORED.
# Misc. options
"accounts", \$CONFIG{'accounts'},
@@ -961,7 +968,7 @@ sub parseCommandLineArguments
if ( $VERSION )
{
my $REVISION = '$Revision: 1.92 $';
my $REVISION = '$Revision: 1.93 $';
if ( $REVISION =~ /1.([0-9.]+) / )
{
$REVISION = $1;

View File

@@ -7,7 +7,7 @@
#
# Steve
# --
# $Id: getopt.t,v 1.2 2006-06-22 15:01:53 steve Exp $
# $Id: getopt.t,v 1.3 2006-09-10 21:04:20 steve Exp $
use strict;
@@ -136,6 +136,6 @@ sub testFile
#
foreach my $argument ( @documented )
{
is( $accepted{$argument}, 1, "Option '--$argument' accepted" );
is( $accepted{$argument}, 1, "Option '--$argument' accepted: $file" );
}
}