From 74605751a4bd51585999be009c372d1c83b15251 Mon Sep 17 00:00:00 2001 From: Dave Aitken Date: Tue, 17 Apr 2018 10:57:12 +0100 Subject: [PATCH] Turn on LR debug on test servers --- test/test_files_server.ml | 2 +- test/test_opium_server.ml | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/test/test_files_server.ml b/test/test_files_server.ml index caeedfe..759266b 100644 --- a/test/test_files_server.ml +++ b/test/test_files_server.ml @@ -44,7 +44,7 @@ let make_handler () = ~body:(Sexplib.Sexp.to_string_hum (Cohttp.Request.sexp_of_t req)) () in - let handler = Livereload.make_handler [{ local_dir = "test/static"; server_path = "/static" }] next in + let handler = Livereload.make_handler ~debug:true [{ local_dir = "test/static"; server_path = "/static" }] next in fun conn req body -> Lwt_io.eprintf "[CONN] %s\n%!" (Cohttp.Connection.to_string @@ snd conn) >>= fun _ -> diff --git a/test/test_opium_server.ml b/test/test_opium_server.ml index 62bb7d1..eb45d79 100644 --- a/test/test_opium_server.ml +++ b/test/test_opium_server.ml @@ -18,7 +18,7 @@ let index = Printf.sprintf {| let hello = get "/" (fun _ -> `String index |> respond') -let lr_handler = Livereload.make_handler [{ local_dir = "test/static"; server_path = "/static" }] +let lr_handler = Livereload.make_handler ~debug:true [{ local_dir = "test/static"; server_path = "/static" }] let app = let static = Middleware.static ~local_path:"test/static" ~uri_prefix:"/static" in