changeset 1469:30284bd9ab18

Tests: avoid uninitialized warnings in stream_upstream_random.t.
author Sergey Kandaurov <pluknet@nginx.com>
date Wed, 24 Apr 2019 14:52:53 +0300
parents 875967f737d4
children ed2be714a3af
files stream_upstream_random.t
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/stream_upstream_random.t
+++ b/stream_upstream_random.t
@@ -243,7 +243,8 @@ sub parallel {
 	my @s = map { get($port, $uri, start => 1, sleep => 0.1) } (1 .. $n);
 
 	for (@s) {
-		if (http_end($_) =~ /X-Port: (\d+)/) {
+		my $r = http_end($_);
+		if ($r && $r =~ /X-Port: (\d+)/) {
 			$ports{$1} = 0 unless defined $ports{$1};
 			$ports{$1}++;
 		}