Move increased tolerance for list/scalar parameter ahead so it actually matters
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@11721 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
5b0b967a30
commit
7a89b99b71
@ -952,12 +952,12 @@ sub handle_response {
|
||||
|
||||
# Handle {node} structure
|
||||
my $errflg=0;
|
||||
if (scalar @{$rsp->{node}}) {
|
||||
#print "printing node\n";
|
||||
my $nodes=($rsp->{node});
|
||||
unless (ref $nodes eq 'ARRAY') {
|
||||
$nodes = [$nodes];
|
||||
}
|
||||
if (scalar @{$nodes}) {
|
||||
#print "printing node\n";
|
||||
my $node;
|
||||
foreach $node (@$nodes) {
|
||||
my $desc=$node->{name}->[0];
|
||||
|
Loading…
Reference in New Issue
Block a user