-Explicitly instruct SSL to do inet4 only if our ipv6 support checks fail

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@4642 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso 2009-11-21 17:44:46 +00:00
parent 37c9472acb
commit 76b5a8eb31
2 changed files with 2 additions and 2 deletions

View File

@ -30,7 +30,7 @@ if ($inet6support) {
unless ($inet6support) {
eval { require Socket };
eval { require IO::Socket::INET };
eval { require IO::Socket::SSL; IO::Socket::SSL->import() };
eval { require IO::Socket::SSL; IO::Socket::SSL->import('inet4') };
}

View File

@ -55,7 +55,7 @@ if ($inet6support) {
unless ($inet6support) {
eval { require Socket };
eval { require IO::Socket::INET };
eval { require IO::Socket::SSL; IO::Socket::SSL->import(); };
eval { require IO::Socket::SSL; IO::Socket::SSL->import('inet4'); };
}
my $dispatch_requests = 1; # govern whether commands are dispatchable