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:
nott 2008-03-07 20:37:33 +00:00
parent d7857db1b9
commit 5ddb39f20f

View File

@ -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,