From 5cd2bfac5e47232f9e1a8f6189bcc49a3e73007f Mon Sep 17 00:00:00 2001 From: Stefano Zacchiroli Date: Wed, 24 Jan 2007 09:10:03 +0000 Subject: [PATCH] send internally generated headers in lowercase form for consistency --- DEVEL/ocaml-http/debian/changelog | 7 +++++++ DEVEL/ocaml-http/http_daemon.ml | 1 + 2 files changed, 8 insertions(+) diff --git a/DEVEL/ocaml-http/debian/changelog b/DEVEL/ocaml-http/debian/changelog index 5d0033b8b..9b39aa5c4 100644 --- a/DEVEL/ocaml-http/debian/changelog +++ b/DEVEL/ocaml-http/debian/changelog @@ -1,3 +1,10 @@ +ocaml-http (0.1.4-1) UNRELEASED; urgency=low + + * send internally generated headers as lowercase strings, for consistency + with headers generated via setXXX methods + + -- Stefano Zacchiroli Wed, 24 Jan 2007 10:09:12 +0100 + ocaml-http (0.1.3-3) UNRELEASED; urgency=low * debian/rules diff --git a/DEVEL/ocaml-http/http_daemon.ml b/DEVEL/ocaml-http/http_daemon.ml index 992f3b99a..f7c8495de 100644 --- a/DEVEL/ocaml-http/http_daemon.ml +++ b/DEVEL/ocaml-http/http_daemon.ml @@ -36,6 +36,7 @@ let send_raw ~data outchan = let send_CRLF = send_raw ~data:crlf let send_header ~header ~value = + let header = String.lowercase header in Http_parser_sanity.heal_header (header, value); send_raw ~data:(header ^ ": " ^ value ^ crlf) -- 2.39.2