From 79f34ae703e4eb389de42d4ee7ff7eb83eec3eac Mon Sep 17 00:00:00 2001
From: Jay McCarthy <jay@racket-lang.org>
Date: Mon, 18 Sep 2006 15:56:15 +0000
Subject: [PATCH] up

svn: r4365
---
 collects/web-server/response.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/web-server/response.ss b/collects/web-server/response.ss
index 7bf31c9d21..6aeafa9bcb 100644
--- a/collects/web-server/response.ss
+++ b/collects/web-server/response.ss
@@ -59,7 +59,7 @@
   ;;    must be compliant with http 1.0. In this case the chunked response is
   ;;    simply turned into a non-chunked one.
   
-  (define TEXT/HTML-MIME-TYPE #"text/html")
+  (define TEXT/HTML-MIME-TYPE #"text/html; charset=utf-8")
   (define (data-length x)
     (if (string? x)
         (data-length (string->bytes/utf-8 x))