about summary refs log tree commit diff
path: root/users/Profpatsch/my-prelude/src
diff options
context:
space:
mode:
authorVincent Ambo <tazjin@tvl.su>2023-10-08T21·22+0300
committertazjin <tazjin@tvl.su>2023-10-09T09·09+0000
commit47bc5bb4bc10b31294bce2ea37bcebaff3002f07 (patch)
treecd4a30ff713480da629a2e4e83de3a014f06dfa5 /users/Profpatsch/my-prelude/src
parent5f53841a343f0f2b5a66f9d58739b19a2e81dcb9 (diff)
chore(3p/sources): bump channels & overlays (2023-10-08) r/6747
Change-Id: I9eeaffad53aba278cd9082c5b4c3e7b1c5f6cc22
Reviewed-on: https://cl.tvl.fyi/c/depot/+/9585
Tested-by: BuildkiteCI
Reviewed-by: tazjin <tazjin@tvl.su>
Reviewed-by: Profpatsch <mail@profpatsch.de>
Autosubmit: tazjin <tazjin@tvl.su>
Diffstat (limited to 'users/Profpatsch/my-prelude/src')
-rw-r--r--users/Profpatsch/my-prelude/src/Postgres/MonadPostgres.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/users/Profpatsch/my-prelude/src/Postgres/MonadPostgres.hs b/users/Profpatsch/my-prelude/src/Postgres/MonadPostgres.hs
index 45c94b2009ca..55cedb336c32 100644
--- a/users/Profpatsch/my-prelude/src/Postgres/MonadPostgres.hs
+++ b/users/Profpatsch/my-prelude/src/Postgres/MonadPostgres.hs
@@ -13,6 +13,7 @@ import Control.Monad.Reader (MonadReader (ask), ReaderT (..))
 import Control.Monad.Trans.Resource
 import Data.Aeson (FromJSON)
 import Data.Error.Tree
+import Data.HashMap.Strict qualified as HashMap
 import Data.Int (Int64)
 import Data.Kind (Type)
 import Data.List qualified as List
@@ -539,6 +540,7 @@ traceQueryIfEnabled tools span logDatabaseQueries qry params = do
   let doLog errs =
         Otel.addAttributes
           span
+          $ HashMap.fromList
           $ ( ("postgres.query", Otel.toAttribute @Text errs.query)
                 : ( errs.explain
                       & foldMap