Mercurial > hg > nginx-tests

comparison lib/Test/Nginx.pm @ 271:1a6eef7ac914

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: test for r->request_body->buf incorrect reuse.
author Maxim Dounin <mdounin@mdounin.ru>
date Wed, 20 Mar 2013 19:31:47 +0400
parents f857180657c9
children 6cbcfb4ef7ee
comparison
equal deleted inserted replaced
270:f857180657c9 271:1a6eef7ac914
418 $s->print($request); 418 $s->print($request);
419 419
420 select undef, undef, undef, $extra{sleep} if $extra{sleep}; 420 select undef, undef, undef, $extra{sleep} if $extra{sleep};
421 return '' if $extra{aborted}; 421 return '' if $extra{aborted};
422 422
423 if ($extra{body}) {
424 log_out($extra{body});
425 $s->print($extra{body});
426 }
427
423 local $/; 428 local $/;
424 $reply = $s->getline(); 429 $reply = $s->getline();
425 430
426 alarm(0); 431 alarm(0);
427 }; 432 };