From 93d7f665f851270c337b7316dcb8ed636fce44d4 Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Tue, 20 Jun 2006 02:45:56 +0000 Subject: [PATCH] 8120 svn: r3418 --- collects/web-server/private/request.ss | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/collects/web-server/private/request.ss b/collects/web-server/private/request.ss index 3ba510de31..ef60a9628c 100644 --- a/collects/web-server/private/request.ss +++ b/collects/web-server/private/request.ss @@ -46,7 +46,8 @@ (and (= major 1) (= minor 0)) (match (headers-assq #"Connection" headers) [(struct header (f v)) - (regexp-match rx v)] + (and (regexp-match rx v) + #t)] [#f #f]) (msie-from-local-machine? headers client-ip host-ip)))))