Mercurial > hg > nginx-quic

comparison src/http/modules/perl/nginx.xs @ 1444:37938e68910b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
allow to append charset to the "Content-Type" header
author Igor Sysoev <igor@sysoev.ru>
date Fri, 31 Aug 2007 18:47:25 +0000
parents 2cc9b6651f75
children f497ed7682a7
comparison
equal deleted inserted replaced
1443:f8142ab2bace 1444:37938e68910b
128 if (ngx_http_perl_sv2str(aTHX_ r, &r->headers_out.content_type, sv) 128 if (ngx_http_perl_sv2str(aTHX_ r, &r->headers_out.content_type, sv)
129 != NGX_OK) 129 != NGX_OK)
130 { 130 {
131 XSRETURN_EMPTY; 131 XSRETURN_EMPTY;
132 } 132 }
133
134 r->headers_out.content_type_len = r->headers_out.content_type.len;
133 135
134 } else { 136 } else {
135 if (ngx_http_set_content_type(r) != NGX_OK) { 137 if (ngx_http_set_content_type(r) != NGX_OK) {
136 XSRETURN_EMPTY; 138 XSRETURN_EMPTY;
137 } 139 }