Commit 66a60003 authored by Matthias Kraft's avatar Matthias Kraft Committed by Richard Levitte
Browse files

Fix Invalid Argument return code from IP_Factory in connect_to_server().

parent adc7e221
Loading
Loading
Loading
Loading
+1 −1
Original line number Diff line number Diff line
@@ -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 {