From 5fb97dd85f3503abed366598d4f00396b8a23d4f Mon Sep 17 00:00:00 2001 From: Karn Kallio Date: Wed, 16 Nov 2011 12:51:22 -0530 Subject: Include character encoding in HTTP response headers. --- src/cjr_print.sml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/cjr_print.sml b/src/cjr_print.sml index 4e3e1570..1c809f38 100644 --- a/src/cjr_print.sml +++ b/src/cjr_print.sml @@ -2814,7 +2814,7 @@ fun p_file env (ds, ps) = box (case ek of Core.Rpc _ => [string "uw_write_header(ctx, \"Content-type: text/plain\\r\\n\");", newline] - | _ => [string "uw_write_header(ctx, \"Content-type: text/html\\r\\n\");", + | _ => [string "uw_write_header(ctx, \"Content-type: text/html; charset=utf-8\\r\\n\");", newline, string "uw_write_header(ctx, \"Content-script-type: text/javascript\\r\\n\");", newline, -- cgit v1.2.3