From 0dc0a00f1e4f11ec57166fb0554bc71a2573fa8e Mon Sep 17 00:00:00 2001 From: Cuihtlauac ALVARADO Date: Thu, 13 Feb 2025 10:15:25 +0100 Subject: [PATCH] Formatting --- src/ocamlorg_web/lib/router.ml | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/src/ocamlorg_web/lib/router.ml b/src/ocamlorg_web/lib/router.ml index cbe49031fa..80dd71a8ec 100644 --- a/src/ocamlorg_web/lib/router.ml +++ b/src/ocamlorg_web/lib/router.ml @@ -134,7 +134,10 @@ let middleware_text_utf8 handler request = let ( let& ) opt some = Option.fold ~none:response ~some opt in let headers = Dream.all_headers response in let& content_type = List.assoc_opt "Content-Type" headers in - let& _ = if String.starts_with ~prefix:"text/plain" content_type then Some () else None in + let& _ = + if String.starts_with ~prefix:"text/plain" content_type then Some () + else None + in Dream.drop_header response "Content-Type"; Dream.add_header response "Content-Type" (content_type ^ "; charset=utf-8"); response