packages feed

pg-transact 0.2.0.1 → 0.2.1.0

raw patch · 2 files changed

+6/−3 lines, 2 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

+ Database.PostgreSQL.Transact: runDBTNoTransaction :: DBT m a -> Connection -> m a
- Database.PostgreSQL.Transact: rollback :: DB () -> DB ()
+ Database.PostgreSQL.Transact: rollback :: DB a -> DB a

Files

pg-transact.cabal view
@@ -1,5 +1,5 @@ name:                pg-transact-version:             0.2.0.1+version:             0.2.1.0 synopsis: Another postgresql-simple transaction monad description: Another postgresql-simple transaction monad homepage:            https://github.com/jfischoff/pg-transact#readme
src/Database/PostgreSQL/Transact.hs view
@@ -90,6 +90,9 @@   $ run   $ runReaderT (unDBT action) conn +runDBTNoTransaction :: DBT m a -> Connection -> m a+runDBTNoTransaction action conn = runReaderT (unDBT action) conn+ -- | Perform a @SELECT@ or other SQL query that is expected to return -- results. All results are retrieved and converted before this -- function returns.@@ -215,8 +218,8 @@ rollbackToAndReleaseSavepoint :: Savepoint -> DB () rollbackToAndReleaseSavepoint sp = getConnection >>= liftIO . flip Simple.rollbackToAndReleaseSavepoint sp --- | Run an action and discard the effects.-rollback :: DB () -> DB ()+-- | Run an action and discard the effects but return the result+rollback :: DB a -> DB a rollback actionToRollback = mask $ \restore -> do   sp <- savepoint   restore actionToRollback `finally` rollbackToAndReleaseSavepoint sp