Mercurial > hg > nginx-tests
changeset 72:24143894b91b
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 | c8ba98ad0570 |
files | proxy-noclose.t smtp.t |
diffstat | 2 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/proxy-noclose.t Wed Feb 11 15:14:42 2009 +0300 +++ b/proxy-noclose.t Tue Feb 17 15:03:00 2009 +0300 @@ -79,6 +79,7 @@ TODO: { local $TODO = 'not fixed yet, patches under review'; +local $SIG{__WARN__} = sub {}; like(http_get('/'), qr/SEE-THIS/, 'request to bad backend'); like(http_get('/multi'), qr/AND-THIS/, 'bad backend - multiple packets');
--- a/smtp.t Wed Feb 11 15:14:42 2009 +0300 +++ b/smtp.t Tue Feb 17 15:03:00 2009 +0300 @@ -143,6 +143,7 @@ TODO: { local $TODO = 'pipelining not in official nginx'; +local $SIG{__WARN__} = sub {}; $s = Test::Nginx::SMTP->new(); $s->read(); @@ -199,6 +200,7 @@ TODO: { local $TODO = 'pipelining not in official nginx'; +local $SIG{__WARN__} = sub {}; $s->ok('pipelined rcpt to'); $s->ok('pipelined rset');