diff options
author | Matthias Kraft <Matthias.Kraft@softwareag.com> | 2019-02-04 09:55:07 +0100 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2019-02-04 21:52:20 +0100 |
commit | 5dc422c7abbd243a5a665f81d7f1e589b646967d (patch) | |
tree | 07b05faed4daa0f3590e1229b95249cdbfdfaa67 /util | |
parent | 453eccd63ad6ba19f6a3fcac37df05daf6cc1021 (diff) |
Fix Invalid Argument return code from IP_Factory in connect_to_server().
Fixes #7732
Reviewed-by: Matt Caswell <matt@openssl.org>
Reviewed-by: Richard Levitte <levitte@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/8158)
(cherry picked from commit 66a60003719240399f6596e58c239df0465a4f70)
Diffstat (limited to 'util')
-rw-r--r-- | util/perl/TLSProxy/Proxy.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/util/perl/TLSProxy/Proxy.pm b/util/perl/TLSProxy/Proxy.pm index 8c13520ec6..89c8c1d6f2 100644 --- a/util/perl/TLSProxy/Proxy.pm +++ b/util/perl/TLSProxy/Proxy.pm @@ -44,7 +44,7 @@ BEGIN $s->close(); }; if ($@ eq "") { - $IP_factory = sub { IO::Socket::INET6->new(@_); }; + $IP_factory = sub { IO::Socket::INET6->new(Domain => AF_INET6, @_); }; $have_IPv6 = 1; } else { eval { |