Subversion Repositories DevTools

Rev

Rev 7321 | Rev 7323 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7321 Rev 7322
Line 192... Line 192...
192
# Inputs          : None
192
# Inputs          : None
193
#
193
#
194
#
194
#
195
sub create_sandbox
195
sub create_sandbox
196
{
196
{
-
 
197
    my  $opt_force;
197
    GetOptions (
198
    GetOptions (
198
                "help:+"        => \$opt_help,
199
                "help:+"        => \$opt_help,
199
                "manual:3"      => \$opt_help,
200
                "manual:3"      => \$opt_help,
-
 
201
                "force!"        => \$opt_force,
200
                ) || Error ("Invalid command line" );
202
                ) || Error ("Invalid command line" );
201
 
203
 
202
    SubCommandHelp( $opt_help, "Create Sandbox") if ($opt_help || $#ARGV >= 0 );
204
    SubCommandHelp( $opt_help, "Create Sandbox") if ($opt_help || $#ARGV >= 0 );
203
 
205
 
204
    Error ("Cannot create a sandbox within a sandbox",
206
    Error ("Cannot create a sandbox within a sandbox",
205
           "Sandbox base is: $GBE_SANDBOX" ) if ( $GBE_SANDBOX );
207
           "Sandbox base is: $GBE_SANDBOX" ) if ( $GBE_SANDBOX && !$opt_force );
206
 
208
 
207
    mkdir ('sandbox_dpkg_archive') || Error ("Cannot create the directory: sandbox_dpkg_archive") ;
209
    mkdir ('sandbox_dpkg_archive') || Error ("Cannot create the directory: sandbox_dpkg_archive") ;
208
 
210
 
209
    Message ('Sandbox created');
211
    Message ('Sandbox created');
210
    exit  0;
212
    exit  0;
Line 3438... Line 3440...
3438
jats sandbox create [command options]
3440
jats sandbox create [command options]
3439
 
3441
 
3440
 Command Options
3442
 Command Options
3441
    -help[=n]               - Command specific help, [n=1,2,3]
3443
    -help[=n]               - Command specific help, [n=1,2,3]
3442
    -verbose[=n]            - Verbose operation
3444
    -verbose[=n]            - Verbose operation
-
 
3445
    -[no]force              - Force creation of nested sandbox
3443
 
3446
 
3444
=head2 OPTIONS
3447
=head2 OPTIONS
3445
 
3448
 
3446
The 'create' command takes no options.
3449
The 'create' command takes the following options.
-
 
3450
 
-
 
3451
=item -[no]force
-
 
3452
 
-
 
3453
Normally a sandbox should not be created within another sandbox. 
-
 
3454
 
-
 
3455
The use of this option overrides this limitation.
-
 
3456
 
-
 
3457
A sandbox with a sandbox will be ignored by the parent sandbox.
-
 
3458
 
-
 
3459
=back
3447
 
3460
 
3448
=head2 DESCRIPTION
3461
=head2 DESCRIPTION
3449
 
3462
 
3450
The 'create' command will create a sandbox in the users current directory. It is
3463
The 'create' command will create a sandbox in the users current directory. It is
3451
not possible to create a sandbox within a sandbox.
3464
not possible to create a sandbox within a sandbox.