snaplet-persistent 0.2.0.1 → 0.3
raw patch · 2 files changed
+12/−11 lines, 2 filesdep ~configuratordep ~heistdep ~lens
Dependency ranges changed: configurator, heist, lens, persistent, persistent-postgresql, persistent-template, readable, snap, text
Files
snaplet-persistent.cabal view
@@ -1,5 +1,5 @@ name: snaplet-persistent-version: 0.2.0.1+version: 0.3 synopsis: persistent snaplet for the Snap Framework description: Snaplet support for using the Postgresql database with a Snap Framework application via the persistent@@ -40,21 +40,21 @@ bytestring >= 0.9.1 && < 0.11, clientsession >= 0.7.2 && < 0.10, configurator >= 0.2 && < 0.3,- heist >= 0.12 && < 0.13,- lens >= 3.7.0.1 && < 3.10,+ heist >= 0.13 && < 0.14,+ lens >= 3.7.0.1 && < 4.1, errors >= 1.4 && < 1.5, MonadCatchIO-transformers >= 0.3 && < 0.4, monad-logger >= 0.2.4 && < 0.4, mtl >= 2 && < 3,- persistent >= 1.2 && < 1.3,- persistent-postgresql >= 1.2 && < 1.3,- persistent-template >= 1.2 && < 1.3,- readable >= 0.1 && < 0.2,+ persistent >= 1.2 && < 1.4,+ persistent-postgresql >= 1.2 && < 1.4,+ persistent-template >= 1.2 && < 1.4,+ readable >= 0.1 && < 0.3, resource-pool-catchio >= 0.2 && < 0.3, resourcet >= 0.4 && < 0.5, safe >= 0.3 && < 0.4,- snap >= 0.11 && < 0.13,- text >= 0.11 && < 0.12,+ snap >= 0.13 && < 0.14,+ text >= 0.11 && < 1.2, time >= 1.1 && < 1.5, transformers >= 0.2 && < 0.4, unordered-containers >= 0.2 && < 0.3
src/Snap/Snaplet/Auth/Backends/Persistent.hs view
@@ -39,6 +39,7 @@ import Database.Persist.Postgresql import Database.Persist.Quasi import Database.Persist.TH hiding (derivePersistField)+import Heist import Heist.Compiled import Paths_snaplet_persistent import Safe@@ -105,8 +106,8 @@ -- | Splices for 'SnapAuthUser' that are equivalent to the ones for -- 'AuthUser'. dbUserSplices :: Monad n- => [(Text, Promise (Entity SnapAuthUser) -> Splice n)]-dbUserSplices = repromise (return . db2au) userCSplices+ => Splices (RuntimeSplice n (Entity SnapAuthUser) -> Splice n)+dbUserSplices = mapS (deferMap (return . db2au)) userCSplices data PersistAuthManager = PAM {