File tree Expand file tree Collapse file tree 3 files changed +10
-1
lines changed
src/Database/PostgreSQL/Query Expand file tree Collapse file tree 3 files changed +10
-1
lines changed Original file line number Diff line number Diff line change 1
1
# CHANGELOG
2
2
3
+ ## 2.2.0
4
+ ### Added
5
+ * ` MonadHReader ` instance for ` PgMonadT `
6
+
3
7
## 2.1.0
4
8
### Changed
5
9
* use hset-2.0 and hreader-1.0
Original file line number Diff line number Diff line change 1
1
name : postgresql-query
2
- version : 2.1 .0
2
+ version : 2.2 .0
3
3
4
4
synopsis : Sql interpolating quasiquote plus some kind of primitive ORM
5
5
using it
Original file line number Diff line number Diff line change @@ -354,6 +354,11 @@ instance (MonadReader r m) => MonadReader r (PgMonadT m) where
354
354
{-# INLINABLE local #-}
355
355
{-# INLINABLE reader #-}
356
356
357
+ instance (MonadHReader m ) => MonadHReader (PgMonadT m ) where
358
+ type MHRElements (PgMonadT m ) = MHRElements m
359
+ askHSet = PgMonadT askHSet
360
+ {-# INLINEABLE askHSet #-}
361
+
357
362
instance (MonadBase IO m ) => HasPostgres (PgMonadT m ) where
358
363
withPGConnection action = do
359
364
con <- PgMonadT ask
You can’t perform that action at this time.
0 commit comments