From 998e5bc1ec075b173b6805f8264cf264740a89d3 Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Tue, 30 Nov 2010 21:51:37 -0700 Subject: [PATCH] Implementation note --- collects/web-server/http/response.rkt | 1 + 1 file changed, 1 insertion(+) diff --git a/collects/web-server/http/response.rkt b/collects/web-server/http/response.rkt index cdee92c9b8..947f597226 100644 --- a/collects/web-server/http/response.rkt +++ b/collects/web-server/http/response.rkt @@ -22,6 +22,7 @@ (output-response/method conn resp #"GET")) (define (output-response/method conn resp meth) + ; XXX Use chunked encoding for non-terminated responses (unless (terminated-response? resp) (set-connection-close?! conn #t)) (output-response-head conn resp)