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:
		@@ -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,
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user