diff options
author | Profpatsch <mail@profpatsch.de> | 2024-05-11T21·08+0200 |
---|---|---|
committer | clbot <clbot@tvl.fyi> | 2024-05-13T14·52+0000 |
commit | a6b4134468ad6a286a0caf9671ceab368a363192 (patch) | |
tree | cb3b840db173c5a6506e7073725346df84e0f3a2 /users/Profpatsch/my-prelude/src/Postgres | |
parent | a2d56cedaf4ef7c5a52e4029581eb692814441fa (diff) |
refactor(users/Profpatsch/MonadPostgres): rephrase maybe match r/8132
wtf was I thinking Change-Id: Ia621032d90d7a9363dfe2bfbed122c67c90468f7 Reviewed-on: https://cl.tvl.fyi/c/depot/+/11651 Reviewed-by: Profpatsch <mail@profpatsch.de> Autosubmit: Profpatsch <mail@profpatsch.de> Tested-by: BuildkiteCI
Diffstat (limited to 'users/Profpatsch/my-prelude/src/Postgres')
-rw-r--r-- | users/Profpatsch/my-prelude/src/Postgres/MonadPostgres.hs | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/users/Profpatsch/my-prelude/src/Postgres/MonadPostgres.hs b/users/Profpatsch/my-prelude/src/Postgres/MonadPostgres.hs index 7e4e75d8e9a8..8d82eb553bd0 100644 --- a/users/Profpatsch/my-prelude/src/Postgres/MonadPostgres.hs +++ b/users/Profpatsch/my-prelude/src/Postgres/MonadPostgres.hs @@ -718,10 +718,9 @@ traceQueryIfEnabled tools span logDatabaseQueries qry params = do $ HashMap.fromList $ ( ("_.postgres.query", Otel.toAttribute @Text errs.query) : ( errs.explain - & foldMap - ( \ex -> - [("_.postgres.explain", Otel.toAttribute @Text ex)] - ) + & \case + Nothing -> [] + Just ex -> [("_.postgres.explain", Otel.toAttribute @Text ex)] ) ) let doExplain = do |