http: don't add "modern" headers by default

diff --git a/basis/http/http.factor b/basis/http/http.factor
index 9a20429ab7540e9318043fb544b9c987b9c6e9d6..9995c31b91069d7428a74917927b889edced1a9f 100644 (file)
--- a/basis/http/http.factor
+++ b/basis/http/http.factor
@@ -195,7 +195,7 @@ TUPLE: response
         "close" "Connection" set-header
         now timestamp>http-string "Date" set-header
         "Factor http.server" "Server" set-header
-        add-modern-headers
+        ! XXX: add-modern-headers
         utf8 >>content-encoding
         V{ } clone >>cookies ;