diff options
| author |  Karn Kallio <kkallio@eka> | 2011-11-16 12:51:22 -0530 |
|---|---|---|
| committer | Karn Kallio <kkallio@eka> | 2011-11-16 12:51:22 -0530 |
| commit | dc1bebf091891becf158a2f2ad8f5e6d86e59b41 (patch) | |
| tree | ab67c87b96dba93e3f98f71d3e3d8dfae3e09e2e | |
| parent | 82e0f83b9af579778f1a81daeedc8affaa81ac46 (diff) | |
Include character encoding in HTTP response headers.
| -rw-r--r-- | src/cjr_print.sml | 2 |
1 files changed, 1 insertions, 1 deletions
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, |