Mercurial > hg > nginx-tests

diff lib/Test/Nginx/Stream.pm @ 951:9361c7eddfc1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: parallel tests support.
author Andrey Zelenkov <zelenkov@nginx.com>
date Tue, 21 Jun 2016 16:37:58 +0300
parents 25a4b2fdd3fb
children 1edb092149e2
line wrap: on
line diff
--- a/lib/Test/Nginx/Stream.pm
+++ b/lib/Test/Nginx/Stream.pm
@@ -28,7 +28,6 @@ sub dgram {
 
 	return Test::Nginx::Stream->new(
 		Proto => "udp",
-		PeerAddr => '127.0.0.1:8080',
 		@_
 	);
 }
@@ -41,7 +40,8 @@ sub new {
 
 	$self->{_socket} = IO::Socket::INET->new(
 		Proto => "tcp",
-		PeerAddr => '127.0.0.1:8080',
+		PeerAddr => '127.0.0.1',
+		PeerPort => ($Test::Nginx::ports[0]{port} || 8080),
 		@_
 	)
 		or die "Can't connect to nginx: $!\n";