From 7a89b99b7192180b6274ce91cdc109266628c917 Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Thu, 1 Mar 2012 14:30:14 +0000
Subject: [PATCH] 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
---
 perl-xCAT/xCAT/Client.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl-xCAT/xCAT/Client.pm b/perl-xCAT/xCAT/Client.pm
index 202b11c0a..9826a8d32 100644
--- a/perl-xCAT/xCAT/Client.pm
+++ b/perl-xCAT/xCAT/Client.pm
@@ -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];