Mercurial > hg > nginx-tests
comparison mail_capability.t @ 1251:766bcbb632ee
Tests: removed TODO and try_run() checks for legacy versions.
author | Sergey Kandaurov <pluknet@nginx.com> |
---|---|
date | Fri, 24 Nov 2017 19:58:40 +0300 |
parents | 0af58b78df35 |
children | dbce8fb5f5f8 |
comparison
equal
deleted
inserted
replaced
1250:b708848eb49a | 1251:766bcbb632ee |
---|---|
158 $s->send('CAPA'); | 158 $s->send('CAPA'); |
159 $s->ok('pop3 capa'); | 159 $s->ok('pop3 capa'); |
160 | 160 |
161 my $caps = get_auth_caps($s); | 161 my $caps = get_auth_caps($s); |
162 like($caps, qr/USER/, 'pop3 - user'); | 162 like($caps, qr/USER/, 'pop3 - user'); |
163 | |
164 TODO: { | |
165 local $TODO = 'not yet' if $t->has_version('1.11.6') | |
166 and !$t->has_version('1.11.11'); | |
167 | |
168 like($caps, qr/SASL (PLAIN LOGIN|LOGIN PLAIN) CRAM-MD5/, 'pop3 - methods'); | 163 like($caps, qr/SASL (PLAIN LOGIN|LOGIN PLAIN) CRAM-MD5/, 'pop3 - methods'); |
169 | |
170 } | |
171 | |
172 unlike($caps, qr/STLS/, 'pop3 - no stls'); | 164 unlike($caps, qr/STLS/, 'pop3 - no stls'); |
173 | 165 |
174 # pop3 starttls | 166 # pop3 starttls |
175 | 167 |
176 $s = Test::Nginx::POP3->new(PeerAddr => '127.0.0.1:' . port(8111)); | 168 $s = Test::Nginx::POP3->new(PeerAddr => '127.0.0.1:' . port(8111)); |
178 | 170 |
179 $s->send('CAPA'); | 171 $s->send('CAPA'); |
180 | 172 |
181 $caps = get_auth_caps($s); | 173 $caps = get_auth_caps($s); |
182 like($caps, qr/USER/, 'pop3 starttls - user'); | 174 like($caps, qr/USER/, 'pop3 starttls - user'); |
183 | |
184 TODO: { | |
185 local $TODO = 'not yet' if $t->has_version('1.11.6') | |
186 and !$t->has_version('1.11.11'); | |
187 | |
188 like($caps, qr/SASL (PLAIN LOGIN|LOGIN PLAIN) CRAM-MD5/, | 175 like($caps, qr/SASL (PLAIN LOGIN|LOGIN PLAIN) CRAM-MD5/, |
189 'pop3 starttls - methods'); | 176 'pop3 starttls - methods'); |
190 | |
191 } | |
192 | |
193 like($caps, qr/STLS/, 'pop3 startls - stls'); | 177 like($caps, qr/STLS/, 'pop3 startls - stls'); |
194 | 178 |
195 # pop3 starttls only | 179 # pop3 starttls only |
196 | 180 |
197 $s = Test::Nginx::POP3->new(PeerAddr => '127.0.0.1:' . port(8112)); | 181 $s = Test::Nginx::POP3->new(PeerAddr => '127.0.0.1:' . port(8112)); |