From e8f93eb30ae463d0a223336b61962395044bcbc9 Mon Sep 17 00:00:00 2001
From: swrup <swrup@protonmail.com>
Date: Thu, 12 Mar 2026 19:24:59 +0100
Subject: [PATCH] hooray~~ls

---
 src/global.ml | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/global.ml b/src/global.ml
index 7baa66d9..30006f70 100644
--- a/src/global.ml
+++ b/src/global.ml
@@ -2,13 +2,14 @@
    [connect_pool] with parameter [?post_connect] for preflight *)
 let db_conn =
   let f Env.{ sw; stack; tcp; dns; fs= _ } =
+    Logs.info (fun m -> m "Connecting to database ...");
     let db_uri = Config.Exchangedb_postgres.config in
     match Caqti_mnet.connect ~sw stack tcp dns db_uri with
     | Error err ->
         Fmt.failwith "Database connection failure: %a." Caqti_error.pp err
     | Ok conn ->
         let () = Pg.preflight conn in
-        Logs.info (fun m -> m "database connection initialized");
+        Logs.info (fun m -> m "... connection done.");
         conn
   in
   let finally (module Conn : Pg.CONN) = Conn.disconnect () in