From ea2730d2510c9b279bbae1505f569a6d7c5d407d Mon Sep 17 00:00:00 2001
From: sjing <sjing@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Wed, 21 Mar 2012 02:54:55 +0000
Subject: [PATCH] fix for the issue xcatd restart failed on SN if there is IPv6
 network entry in xcat networks table.

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.6@11920 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/xCAT/Client.pm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/perl-xCAT/xCAT/Client.pm b/perl-xCAT/xCAT/Client.pm
index 21bba8416..9826a8d32 100644
--- a/perl-xCAT/xCAT/Client.pm
+++ b/perl-xCAT/xCAT/Client.pm
@@ -952,9 +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];