Fixed error code return and GetOpts option.
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@727 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
d7857db1b9
commit
5ddb39f20f
@ -105,7 +105,9 @@ sub process_request
|
||||
$rsp->{data}->[0] = $msg;
|
||||
$::callback->($rsp);
|
||||
}
|
||||
return $ret;
|
||||
if ($ret > 0) {
|
||||
$rsp->{errorcode}->[0] = $ret;
|
||||
}
|
||||
}
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
@ -140,6 +142,7 @@ sub processArgs
|
||||
@ARGV = @{$::args};
|
||||
|
||||
# parse the options
|
||||
Getopt::Long::Configure("no_pass_through");
|
||||
if (
|
||||
!GetOptions(
|
||||
'all|a' => \$::opt_a,
|
||||
|
Loading…
Reference in New Issue
Block a user