From 385440511e0614d71c6234f7b45954ac113a3f04 Mon Sep 17 00:00:00 2001 From: Dirk Koopman Date: Sun, 21 Jul 2013 22:46:18 +0100 Subject: [PATCH] fix ipv6 crash in Msg.pm --- perl/Msg.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/perl/Msg.pm b/perl/Msg.pm index d3817bed..6cad5010 100644 --- a/perl/Msg.pm +++ b/perl/Msg.pm @@ -460,8 +460,8 @@ sub new_server { my $self = $pkg->new($login_proc); $self->{sock} = $io_socket->new ( - LocalAddr => "$my_host:$my_port", -# LocalPort => $my_port, + LocalAddr => $my_host, + LocalPort => $my_port, Listen => SOMAXCONN, Proto => 'tcp', Reuse => 1); -- 2.43.0