# HG changeset patch
# User Igor Sysoev <igor@sysoev.ru>
# Date 1188586045 0
# Node ID 37938e68910ba2149e8934e19219e8917f3ad755
# Parent  f8142ab2bace5f3814bee42f436b22231ed36f19
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
--- 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;