From 9b8586eefea573acfa7bc72d0a785afbc600f976 Mon Sep 17 00:00:00 2001
From: nott <nott@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 3 Dec 2007 12:53:41 +0000
Subject: [PATCH] Add a temporary conditional for IPv6 support.

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@114 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT-2.0/xCAT/Client.pm | 16 +++++++++++++---
 1 file changed, 13 insertions(+), 3 deletions(-)

diff --git a/perl-xCAT-2.0/xCAT/Client.pm b/perl-xCAT-2.0/xCAT/Client.pm
index afe5695ee..2a7e97fbe 100644
--- a/perl-xCAT-2.0/xCAT/Client.pm
+++ b/perl-xCAT-2.0/xCAT/Client.pm
@@ -2,9 +2,19 @@
 # IBM(c) 2007 EPL license http://www.eclipse.org/legal/epl-v10.html
 package xCAT::Client;
 use xCAT::NodeRange;
-use IO::Socket::INET6;
-use Socket6;
-use IO::Socket::SSL qw(inet6);
+use xCAT::Utils;
+
+use IO::Socket::SSL;
+if (xCAT::Utils->isLinux()) {
+        eval { require Socket6 };
+        eval { require IO::Socket::INET6 };
+        eval { require IO::Socket::SSL::inet6 };
+} else {
+
+        eval { require Socket };
+        eval { require IO::Socket::INET };
+}
+
 use XML::Simple;
 use Data::Dumper;
 use Storable qw(dclone);