mirror/nginx
1
0
Fork 0
mirror of https://github.com/nginx/nginx.git synced 2025-01-06 07:27:47 +08:00
Code Issues Actions Packages Projects Releases 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 65b8a197b9
commit df88a81783
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 static void
ngx_http_perl_sleep_handler(ngx_http_request_t *r) 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, ngx_log_debug0(NGX_LOG_DEBUG_HTTP, r->connection->log, 0,
"perl sleep handler"); "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);
}
} }