From e1bc08ed2b35a9b9faf76fab8316aec4224782cb Mon Sep 17 00:00:00 2001
From: polwex <polwex@sortug.com>
Date: Fri, 18 Jul 2025 18:54:42 +0700
Subject: mmm

---
 bin/server.ml | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'bin/server.ml')

diff --git a/bin/server.ml b/bin/server.ml
index f5a8830..21cd225 100644
--- a/bin/server.ml
+++ b/bin/server.ml
@@ -12,7 +12,9 @@ let request_handler ~db_pool Server.{ request; _ } =
   match Lib.Router.match_route request.meth request.target with
   | Some handler ->
     (match handler db_pool request with
-     | Ok response -> response
+     | Ok response ->
+       Logs.info (fun d -> d "apparently ok %S\n" request.target);
+       response
      | Error err ->
        Logs.err (fun m -> m "Handler error: %a" Caqti_error.pp err);
        Response.create `Internal_server_error)
-- 
cgit v1.2.3