Mercurial > hg > nginx

comparison src/http/modules/perl/ngx_http_perl_module.c @ 3050:f54b02dbb12b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
axe r->connection->destroyed testing
author Igor Sysoev <igor@sysoev.ru>
date Wed, 26 Aug 2009 16:14:57 +0000
parents c7d57b539248
children 5e8bf3e983d2
comparison
equal deleted inserted replaced
3049:67254117b774 3050:f54b02dbb12b
684 684
685 n = call_sv(sub, G_EVAL); 685 n = call_sv(sub, G_EVAL);
686 686
687 SPAGAIN; 687 SPAGAIN;
688 688
689 if (c->destroyed) {
690 PUTBACK;
691
692 FREETMPS;
693 LEAVE;
694
695 return NGX_DONE;
696 }
697
698 if (n) { 689 if (n) {
699 if (rv == NULL) { 690 if (rv == NULL) {
700 status = POPi; 691 status = POPi;
701 692
702 ngx_log_debug1(NGX_LOG_DEBUG_HTTP, c->log, 0, 693 ngx_log_debug1(NGX_LOG_DEBUG_HTTP, c->log, 0,