Fijxu/nginx-quic
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

fix ngx_http_perl_sleep_handler()

Browse source
This commit is contained in:
Igor Sysoev 2006-12-13 12:30:57 +00:00
parent ab48ef48de
commit 1bafd0a755
1 changed files with 13 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
src/http/modules/perl/ngx_http_perl_module.c
View file

@ -273,10 +273,22 @@ ngx_http_perl_handle_request(ngx_http_request_t *r)
static void
ngx_http_perl_sleep_handler(ngx_http_request_t *r)
{
ngx_event_t *wev;
ngx_log_debug0(NGX_LOG_DEBUG_HTTP, r->connection->log, 0,
"perl sleep handler");
ngx_http_perl_handle_request(r);
wev = r->connection->write;
if (wev->timedout) {
wev->timedout = 0;
ngx_http_perl_handle_request(r);
return;
}
if (ngx_handle_write_event(wev, 0) == NGX_ERROR) {
ngx_http_finalize_request(r, NGX_HTTP_INTERNAL_SERVER_ERROR);
}
}