more better logging

zachary822 · Nov 30, 2023 · b95b0a5 · b95b0a5
1 parent 78892a8
commit b95b0a5
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/app/Main.hs b/app/Main.hs
@@ -188,7 +188,8 @@ getMaxPage total page = ceiling (fromIntegral total / fromIntegral (pageLimit pa
 runDb :: (MonadIO m) => Database -> Action IO b -> ActionT (App m) b
 runDb dbname q = do
   pool <- lift $ asks getPool
-  logger <- lift askLoggerIO
+
+  logger <- lift $ katipAddNamespace "runDb" askLoggerIO
 
   liftAndCatchIO
     $ recovering