Mercurial > hg > nginx-tests

comparison smtp.t @ 72:24143894b91b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: shut up warnings for TODO tests. Recent versions of Test::Simple/More/Builder (0.61+) throw warnings on undef in like(). While this is good for working tests, it's not for TODO ones. Other tricky part is that neither "no warnings" pragma nor $^W can be used to avoid warnings. The only way that works is to redefine $SIG{__WARN__}.
author Maxim Dounin <mdounin@mdounin.ru>
date Tue, 17 Feb 2009 15:03:00 +0300
parents 4715bd4d4693
children ecff5407867c
comparison
equal deleted inserted replaced
71:4715bd4d4693 72:24143894b91b
141 141
142 # Try auth plain with pipelining 142 # Try auth plain with pipelining
143 143
144 TODO: { 144 TODO: {
145 local $TODO = 'pipelining not in official nginx'; 145 local $TODO = 'pipelining not in official nginx';
146 local $SIG{__WARN__} = sub {};
146 147
147 $s = Test::Nginx::SMTP->new(); 148 $s = Test::Nginx::SMTP->new();
148 $s->read(); 149 $s->read();
149 $s->send('EHLO example.com'); 150 $s->send('EHLO example.com');
150 $s->read(); 151 $s->read();
197 198
198 $s->ok('pipelined mail from'); 199 $s->ok('pipelined mail from');
199 200
200 TODO: { 201 TODO: {
201 local $TODO = 'pipelining not in official nginx'; 202 local $TODO = 'pipelining not in official nginx';
203 local $SIG{__WARN__} = sub {};
202 204
203 $s->ok('pipelined rcpt to'); 205 $s->ok('pipelined rcpt to');
204 $s->ok('pipelined rset'); 206 $s->ok('pipelined rset');
205 207
206 } 208 }