From 70e96fb8ee7406aaa8d1ddbe4735aa7334e68b3d Mon Sep 17 00:00:00 2001 From: david Date: Fri, 16 Aug 2013 08:03:10 +0000 Subject: [PATCH] Use 127.0.0.1 or ::1 where it counts. --- ncat/test/ncat-test.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/ncat/test/ncat-test.pl b/ncat/test/ncat-test.pl index 9a49a75e4..f743bc22d 100755 --- a/ncat/test/ncat-test.pl +++ b/ncat/test/ncat-test.pl @@ -429,12 +429,12 @@ test "Server default listen address and port", sub { my $resp; - my ($c_pid, $c_out, $c_in) = ncat($HOST); + my ($c_pid, $c_out, $c_in) = ncat("127.0.0.1"); syswrite($c_in, "abc\n"); $resp = timeout_read($s_out); $resp eq "abc\n" or die "Server got \"$resp\", not \"abc\\n\""; - my ($c_pid2, $c_out2, $c_in2) = ncat("-6", $IPV6_ADDR); + my ($c_pid2, $c_out2, $c_in2) = ncat("-6", "::1"); syswrite($c_in2, "abc\n"); $resp = timeout_read($s_out); $resp eq "abc\n" or die "Server got \"$resp\", not \"abc\\n\""; @@ -446,7 +446,7 @@ test "Server -4 default listen address and port", sub { my $resp; - my ($c_pid, $c_out, $c_in) = ncat($HOST); + my ($c_pid, $c_out, $c_in) = ncat("127.0.0.1"); syswrite($c_in, "abc\n"); $resp = timeout_read($s_out); $resp eq "abc\n" or die "Server got \"$resp\", not \"abc\\n\"";