fix a perl syntax error in conserver.pm
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@4617 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
c6f566c83b
commit
d3897c07b1
@ -160,13 +160,14 @@ sub preprocess_request {
|
||||
my $no=$reqcopy->{node};
|
||||
#print "node=@$no\n";
|
||||
push @requests, $reqcopy;
|
||||
}
|
||||
} #end if
|
||||
} #end foreach
|
||||
|
||||
if ($::DEBUG) {
|
||||
my $rsp;
|
||||
$rsp->{data}->[0] = "In preprocess_request, request is " . Dumper(@requests);
|
||||
xCAT::MsgUtils->message("I", $rsp, $callback);
|
||||
}
|
||||
}
|
||||
return \@requests;
|
||||
}
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user