diff options
| author | Profpatsch <mail@profpatsch.de> | 2024-03-16T22·26+0100 |
|---|---|---|
| committer | clbot <clbot@tvl.fyi> | 2024-03-16T22·36+0000 |
| commit | 11a2098e0b3a4f202d35a61da06a0bf1c724b8c9 (patch) | |
| tree | 96eacf02a41d5ef755c29d95408df8b86c48e148 /users/Profpatsch/whatcd-resolver/src/AppT.hs | |
| parent | 8335076173d2fd83a9bc13134d554255a527a8aa (diff) | |
feat(users/Profpatsch/my-prelude): update libraries r/7712
The latest and greatest! Change-Id: I34c0e9f41b3b3cc727d9ea89c7ce6a43271b3170 Reviewed-on: https://cl.tvl.fyi/c/depot/+/11169 Autosubmit: Profpatsch <mail@profpatsch.de> Tested-by: BuildkiteCI Reviewed-by: Profpatsch <mail@profpatsch.de>
Diffstat (limited to 'users/Profpatsch/whatcd-resolver/src/AppT.hs')
| -rw-r--r-- | users/Profpatsch/whatcd-resolver/src/AppT.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/users/Profpatsch/whatcd-resolver/src/AppT.hs b/users/Profpatsch/whatcd-resolver/src/AppT.hs index 9c6180c9aaed..7bd38a733e53 100644 --- a/users/Profpatsch/whatcd-resolver/src/AppT.hs +++ b/users/Profpatsch/whatcd-resolver/src/AppT.hs @@ -119,12 +119,12 @@ recordException span dat = liftIO $ do instance (MonadThrow m, MonadUnliftIO m) => MonadPostgres (AppT m) where execute = executeImpl (AppT ask) (AppT $ asks (.config.logDatabaseQueries)) - execute_ = executeImpl_ (AppT ask) (AppT $ asks (.config.logDatabaseQueries)) executeMany = executeManyImpl (AppT ask) (AppT $ asks (.config.logDatabaseQueries)) executeManyReturningWith = executeManyReturningWithImpl (AppT ask) (AppT $ asks (.config.logDatabaseQueries)) queryWith = queryWithImpl (AppT ask) (AppT $ asks (.config.logDatabaseQueries)) queryWith_ = queryWithImpl_ (AppT ask) - foldRows = foldRowsImpl (AppT ask) + + foldRowsWithAcc = foldRowsWithAccImpl (AppT ask) (AppT $ asks (.config.logDatabaseQueries)) runTransaction = runPGTransaction runPGTransaction :: (MonadUnliftIO m) => Transaction (AppT m) a -> AppT m a |