comparison src/http/modules/perl/nginx.xs @ 1531:8b04c0e37099 stable-0.5

r1445 merge: allow to append charset to the "Content-Type" header
author Igor Sysoev <igor@sysoev.ru>
date Sun, 23 Sep 2007 19:26:53 +0000
parents a77f6980de50
children 6b81bbc36eaf
comparison
equal deleted inserted replaced
1530:b7431340e7f8 1531:8b04c0e37099
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 }