--- server/protocols/http.pike.orig	Wed Dec 11 19:12:55 2002
+++ server/protocols/http.pike	Wed Dec 11 19:46:10 2002
@@ -554,7 +554,9 @@
 #endif
        case "content-type":
 #ifdef EXTRA_ROXEN_COMPAT
-	misc[linename] = lower_case(request_headers[linename]);
+	array ct_parts = request_headers[linename]/";";
+	ct_parts[0] = lower_case(ct_parts[0]);
+	misc[linename] = ct_parts*";";
 #endif
 	break;