arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fix call to xdsh and xdcp with no parameters

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@2462 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav
2008-11-04 15:10:20 +00:00
parent fca5b3fcb9
commit eb81dc5640
1 changed files with 10 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
perl-xCAT/xCAT/DSHCLI.pm
View File

@@ -3537,8 +3537,12 @@ sub parse_and_run_dsh
{
my ($class, $nodes, $args, $callback, $command, $noderange) = @_;
@ARGV = @{$args}; # get arguments
$::CALLBACK = $callback;
if (!($args)) {
usage_dsh;
exit 1;
}
@ARGV = @{$args}; # get arguments
if ($ENV{'XCATROOT'})
{
$::XCATROOT = $ENV{'XCATROOT'}; # setup xcatroot home directory
@@ -3813,8 +3817,12 @@ sub usage_dcp
sub parse_and_run_dcp
{
my ($class, $nodes, $args, $callback, $command, $noderange) = @_;
@ARGV = @{$args}; # get arguments
$::CALLBACK = $callback;
if (!($args)) {
usage_dcp;
exit 1;
}
@ARGV = @{$args}; # get arguments
if ($ENV{'XCATROOT'})
{
$::XCATROOT = $ENV{'XCATROOT'}; # setup xcatroot home directory