allow to append charset to the "Content-Type" header

diff --git a/src/http/modules/perl/nginx.xs b/src/http/modules/perl/nginx.xs
index 7423daa934e379229280d39b068bc097cb16c462..fdaedd750e780d4f15d3f189632111e0f473cbbb 100644 (file)
--- a/src/http/modules/perl/nginx.xs
+++ b/src/http/modules/perl/nginx.xs
@@ -131,6 +131,8 @@ send_http_header(r, ...)
             XSRETURN_EMPTY;
         }
 
+        r->headers_out.content_type_len = r->headers_out.content_type.len;
+
     } else {
         if (ngx_http_set_content_type(r) != NGX_OK) {
             XSRETURN_EMPTY;