Tests: use 127.0.0.1 instead of localhost.
Name 'localhost' is ambiguous if ipv6 present on system.
diff --git a/lib/Test/Nginx.pm b/lib/Test/Nginx.pm
index d5df67f..e386949 100644
--- a/lib/Test/Nginx.pm
+++ b/lib/Test/Nginx.pm
@@ -212,7 +212,7 @@
alarm(2);
my $s = IO::Socket::INET->new(
Proto => 'tcp',
- PeerHost => 'localhost:8080'
+ PeerAddr => '127.0.0.1:8080'
);
log_out($request);
$s->print($request);
diff --git a/lib/Test/Nginx/SMTP.pm b/lib/Test/Nginx/SMTP.pm
index b3c132d..44c8eee 100644
--- a/lib/Test/Nginx/SMTP.pm
+++ b/lib/Test/Nginx/SMTP.pm
@@ -22,8 +22,7 @@
my $self = return $class->SUPER::new(
Proto => "tcp",
- PeerAddr => "localhost",
- PeerPort => 8025,
+ PeerAddr => "127.0.0.1:8025",
@_
)
or die "Can't connect to nginx: $!\n";
