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) { |