arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Change IO::Socket::SSL require in servicenode script

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@3133 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
nott 2009-04-08 14:51:04 +00:00
parent e98cc10bca
commit 7b84d06c12
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
xCAT/postscripts/servicenode
View File

@ -27,6 +27,11 @@ use lib "$::XCATROOT/lib/perl";
use strict;
use IO::Socket;
my $useSocketSSL=eval { require IO::Socket::SSL; };
if ($useSocketSSL) {
require IO::Socket::SSL;
}
# MAIN
my $rc=0;
@ -267,7 +272,6 @@ sub getcreds
#####################################################
sub getresponse
{
require IO::SOCKET::SSL;
my ($req) = @_;
my $port = "3001";