From 70ce0aeb8f4b62e6b662f9e0994c41e232ca0f18 Mon Sep 17 00:00:00 2001
From: swrup <swrup@protonmail.com>
Date: Thu, 12 Mar 2026 17:06:03 +0100
Subject: [PATCH]

---
 src/mte.ml | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/mte.ml b/src/mte.ml
index 4c3ca802..8b0428f0 100644
--- a/src/mte.ml
+++ b/src/mte.ml
@@ -91,6 +91,8 @@ let () =
   Caqti_miou.Switch.run @@ fun sw ->
   let db_conn =
     let db_uri = Config.Exchangedb_postgres.config in
+    (* IMPROVE: use caqti pool
+       [connect_pool] with parameter [?post_connect] for preflight *)
     match Caqti_mnet.connect ~sw stack tcp dns db_uri with
     | Error err ->
         Fmt.failwith "Database connection failure: %a." Caqti_error.pp err