# HG changeset patch
# User Sergey Kandaurov <pluknet@nginx.com>
# Date 1545735409 -10800
# Node ID 29d0961bc3f786bb7c943766c8d76b9772f40667
# Parent  2d7fcd713b66768d570783fc7c734e70ed9fd259
Tests: aligned generic read timeouts in stream and mail tests.

diff --git a/lib/Test/Nginx/IMAP.pm b/lib/Test/Nginx/IMAP.pm
--- a/lib/Test/Nginx/IMAP.pm
+++ b/lib/Test/Nginx/IMAP.pm
@@ -60,7 +60,7 @@ sub read {
 	my $socket = $self->{_socket};
 	eval {
 		local $SIG{ALRM} = sub { die "timeout\n" };
-		alarm(3);
+		alarm(8);
 		while (<$socket>) {
 			log_in($_);
 			# XXX
diff --git a/lib/Test/Nginx/POP3.pm b/lib/Test/Nginx/POP3.pm
--- a/lib/Test/Nginx/POP3.pm
+++ b/lib/Test/Nginx/POP3.pm
@@ -60,7 +60,7 @@ sub read {
 	my $socket = $self->{_socket};
 	eval {
 		local $SIG{ALRM} = sub { die "timeout\n" };
-		alarm(3);
+		alarm(8);
 		while (<$socket>) {
 			log_in($_);
 			# XXX
diff --git a/lib/Test/Nginx/SMTP.pm b/lib/Test/Nginx/SMTP.pm
--- a/lib/Test/Nginx/SMTP.pm
+++ b/lib/Test/Nginx/SMTP.pm
@@ -60,7 +60,7 @@ sub read {
 	my $socket = $self->{_socket};
 	eval {
 		local $SIG{ALRM} = sub { die "timeout\n" };
-		alarm(3);
+		alarm(8);
 		while (<$socket>) {
 			log_in($_);
 			next if m/^\d\d\d-/;
diff --git a/lib/Test/Nginx/Stream.pm b/lib/Test/Nginx/Stream.pm
--- a/lib/Test/Nginx/Stream.pm
+++ b/lib/Test/Nginx/Stream.pm
@@ -84,7 +84,7 @@ sub read {
 	$s = $self->{_socket};
 
 	$s->blocking(0);
-	if (IO::Select->new($s)->can_read($extra{read_timeout} || 5)) {
+	if (IO::Select->new($s)->can_read($extra{read_timeout} || 8)) {
 		$s->sysread($buf, 1024);
 	};