-Reorder response parsing to avoid null reference

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@6153 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso 2010-05-17 15:16:47 +00:00
parent 0f859f957c
commit 07c1ba8a10

View File

@ -1138,11 +1138,11 @@ sub power_with_context {
sub power_response {
my $rsp = shift;
my $sessdata = shift;
my @returnd = ($rsp->{code},@{$rsp->{data}});
if($rsp->{error}) {
sendmsg([1,$rsp->{error}],$sessdata->{node});
return;
}
my @returnd = ($rsp->{code},@{$rsp->{data}});
if ($rsp->{code}) {
my $text = $codes{$rsp->{code}};
unless ($text) { $text = sprintf("Unknown response %02xh",$rsp->{code}); }