# HG changeset patch
# User Sergey Kandaurov <pluknet@nginx.com>
# Date 1554200507 -10800
# Node ID e95133e85798971569f7ac8862d98acbfc964f9f
# Parent  80911c4fe0233099ba51f3932c10cc00bac43f9a
Tests: unbreak stream_ssl_realip.t with TLS 1.3.

diff --git a/stream_ssl_realip.t b/stream_ssl_realip.t
--- a/stream_ssl_realip.t
+++ b/stream_ssl_realip.t
@@ -17,8 +17,7 @@ use Socket qw/ $CRLF /;
 BEGIN { use FindBin; chdir($FindBin::Bin); }
 
 use lib 'lib';
-use Test::Nginx;
-use Test::Nginx::Stream qw/ stream /;
+use Test::Nginx qw/ :DEFAULT http_end /;
 
 ###############################################################################
 
@@ -128,14 +127,14 @@ like(pp_get(8088, "PROXY UNKNOWN TCP4 19
 sub pp_get {
 	my ($port, $proxy) = @_;
 
-	my $s = stream(PeerPort => port($port));
-	$s->write($proxy);
+	my $s = IO::Socket::INET->new('127.0.0.1:' . port($port)) or return;
+	http($proxy, start => 1, socket => $s);
 
 	eval {
 		local $SIG{ALRM} = sub { die "timeout\n" };
 		local $SIG{PIPE} = sub { die "sigpipe\n" };
 		alarm(8);
-		IO::Socket::SSL->start_SSL($s->{_socket},
+		IO::Socket::SSL->start_SSL($s,
 			SSL_verify_mode => IO::Socket::SSL::SSL_VERIFY_NONE(),
 			SSL_error_trap => sub { die $_[1] }
 		);
@@ -148,7 +147,7 @@ sub pp_get {
 		return undef;
 	}
 
-	return $s->read();
+	http_end($s);
 }
 
 ###############################################################################