maurice/snix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

chore(3p/sources): bump channels & overlays (2023-10-08)

Browse source 
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>
This commit is contained in:
Vincent Ambo 2023-10-09 00:22:10 +03:00 • committed by tazjin
parent 5f53841a34
commit 47bc5bb4bc
5 changed files with 22 additions and 17 deletions
Download patch file Download diff file Expand all files Collapse all files

2
users/Profpatsch/my-prelude/src/Postgres/MonadPostgres.hs
View file

@ -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