Mercurial > hg > nginx
comparison src/http/modules/perl/ngx_http_perl_module.c @ 673:b80f94fa2197 release-0.3.58
nginx-0.3.58-RELEASE import
*) Feature: the "error_page" directive supports the variables.
*) Change: now the procfs interface instead of sysctl is used on Linux.
*) Change: now the "Content-Type" header line is inherited from first
response when the "X-Accel-Redirect" was used.
*) Bugfix: the "error_page" directive did not redirect the 413 error.
*) Bugfix: the trailing "?" did not remove old arguments if no new
arguments were added to a rewritten URI.
*) Bugfix: nginx could not run on 64-bit FreeBSD 7.0-CURRENT.
| author | Igor Sysoev <igor@sysoev.ru> |
|---|---|
| date | Mon, 14 Aug 2006 15:09:38 +0000 |
| parents | 63a820b0bc6c |
| children | 7e24168b0853 |
comparison
equal
deleted
inserted
replaced
| 672:9542722efd0d | 673:b80f94fa2197 |
|---|---|
| 224 ngx_http_perl_loc_conf_t *plcf; | 224 ngx_http_perl_loc_conf_t *plcf; |
| 225 ngx_http_perl_main_conf_t *pmcf; | 225 ngx_http_perl_main_conf_t *pmcf; |
| 226 | 226 |
| 227 ngx_log_debug0(NGX_LOG_DEBUG_HTTP, r->connection->log, 0, "perl handler"); | 227 ngx_log_debug0(NGX_LOG_DEBUG_HTTP, r->connection->log, 0, "perl handler"); |
| 228 | 228 |
| 229 /* mod_perl's content handler assumes that content type was already set */ | |
| 230 | |
| 231 if (ngx_http_set_content_type(r) != NGX_OK) { | |
| 232 ngx_http_finalize_request(r, NGX_HTTP_INTERNAL_SERVER_ERROR); | |
| 233 return; | |
| 234 } | |
| 235 | |
| 236 ctx = ngx_http_get_module_ctx(r, ngx_http_perl_module); | 229 ctx = ngx_http_get_module_ctx(r, ngx_http_perl_module); |
| 237 | 230 |
| 238 if (ctx == NULL) { | 231 if (ctx == NULL) { |
| 239 ctx = ngx_pcalloc(r->pool, sizeof(ngx_http_perl_ctx_t)); | 232 ctx = ngx_pcalloc(r->pool, sizeof(ngx_http_perl_ctx_t)); |
| 240 if (ctx == NULL) { | 233 if (ctx == NULL) { |