Skip to content

Commit 47eea18

Browse files
committed
Merge branch 'release/2.2.0' into production
2 parents f603f80 + eb5e5a7 commit 47eea18

File tree

3 files changed

+10
-1
lines changed

3 files changed

+10
-1
lines changed

CHANGELOG.md

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,9 @@
11
# CHANGELOG
22

3+
## 2.2.0
4+
### Added
5+
* `MonadHReader` instance for `PgMonadT`
6+
37
## 2.1.0
48
### Changed
59
* use hset-2.0 and hreader-1.0

postgresql-query.cabal

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,5 @@
11
name: postgresql-query
2-
version: 2.1.0
2+
version: 2.2.0
33

44
synopsis: Sql interpolating quasiquote plus some kind of primitive ORM
55
using it

src/Database/PostgreSQL/Query/Types.hs

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -354,6 +354,11 @@ instance (MonadReader r m) => MonadReader r (PgMonadT m) where
354354
{-# INLINABLE local #-}
355355
{-# INLINABLE reader #-}
356356

357+
instance (MonadHReader m) => MonadHReader (PgMonadT m) where
358+
type MHRElements (PgMonadT m) = MHRElements m
359+
askHSet = PgMonadT askHSet
360+
{-# INLINEABLE askHSet #-}
361+
357362
instance (MonadBase IO m) => HasPostgres (PgMonadT m) where
358363
withPGConnection action = do
359364
con <- PgMonadT ask

0 commit comments

Comments
 (0)