Mercurial > hg > nginx-tests

diff mail_pop3.t @ 1151:57673c7257a3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: unbreak mail tests in case of EOF.
author Sergey Kandaurov <pluknet@nginx.com>
date Tue, 21 Mar 2017 17:38:37 +0300
parents 2634d0ef48d3
children 766bcbb632ee
line wrap: on
line diff
--- a/mail_pop3.t
+++ b/mail_pop3.t
@@ -207,7 +207,8 @@ sub get_auth_caps {
 	my ($s) = @_;
 	my @meth;
 
-	while ($s->read() !~ qr/^\./) {
+	while ($s->read()) {
+		last if /^\./;
 		push @meth, $1 if /(.*?)\x0d\x0a?/ms;
 	}
 	join ':', @meth;