Mercurial > hg > nginx-quic
changeset 909:f01e6664f9be
fix $r->has_request_body()
author | Igor Sysoev <igor@sysoev.ru> |
---|---|
date | Tue, 12 Dec 2006 20:57:48 +0000 |
parents | 82adc19b4b4d |
children | 918e19c51a65 |
files | src/http/modules/perl/nginx.xs |
diffstat | 1 files changed, 1 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/http/modules/perl/nginx.xs +++ b/src/http/modules/perl/nginx.xs @@ -334,7 +334,6 @@ has_request_body(r, next) dXSTARG; ngx_http_request_t *r; - SV *next; ngx_http_perl_ctx_t *ctx; ngx_http_perl_set_request(r); @@ -343,10 +342,8 @@ has_request_body(r, next) XSRETURN_UNDEF; } - next = ST(1); - ctx = ngx_http_get_module_ctx(r, ngx_http_perl_module); - ctx->next = next; + ctx->next = SvRV(ST(1)); r->request_body_in_single_buf = 1; r->request_body_in_persistent_file = 1;