Mercurial > hg > nginx-tests

diff 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
line wrap: on
line diff
--- a/smtp.t
+++ b/smtp.t
@@ -143,6 +143,7 @@ my $s = Test::Nginx::SMTP->new();
 
 TODO: {
 local $TODO = 'pipelining not in official nginx';
+local $SIG{__WARN__} = sub {};
 
 $s = Test::Nginx::SMTP->new();
 $s->read();
@@ -199,6 +200,7 @@ local $TODO = 'pipelining not in officia
 
 TODO: {
 local $TODO = 'pipelining not in official nginx';
+local $SIG{__WARN__} = sub {};
 
 $s->ok('pipelined rcpt to');
 $s->ok('pipelined rset');