snaplet-persistent 0.6.0 → 0.6.1
raw patch · 4 files changed
+32/−23 lines, 4 filesdep ~bytestringdep ~clientsessiondep ~configurator
Dependency ranges changed: bytestring, clientsession, configurator, errors, heist, lens, monad-logger, mtl, persistent, persistent-postgresql, persistent-template, readable, resource-pool, resourcet, safe, snap, text, time, transformers, unordered-containers
Files
- CHANGELOG.md +4/−0
- snaplet-persistent.cabal +24/−22
- src/Snap/Snaplet/Auth/Backends/Persistent.hs +1/−1
- src/Snap/Snaplet/Auth/Backends/Persistent/Types.hs +3/−0
CHANGELOG.md view
@@ -1,3 +1,7 @@+# 0.6.1+* Add some extensions for persistent >= 2.10.5 (#21)+* Drop support for GHC 8.0.2 and lower+ # 0.6.0 * Switch the transformer order to align with persistent's SqlPersistM. * Allow for newer versions of snap and other dependencies.
snaplet-persistent.cabal view
@@ -1,5 +1,5 @@ name: snaplet-persistent-version: 0.6.0+version: 0.6.1 synopsis: persistent snaplet for the Snap Framework description: Snaplet support for using the Postgresql database with a Snap Framework application via the persistent@@ -9,7 +9,7 @@ author: Soostone Inc. Ozgun Ataman, Doug Beardsley maintainer: ozataman@gmail.com, mightybyte@gmail.com build-type: Simple-cabal-version: >= 1.6+cabal-version: >= 1.10 homepage: https://github.com/soostone/snaplet-persistent category: Web, Snap @@ -32,6 +32,8 @@ Library hs-source-dirs: src + default-language: Haskell2010+ exposed-modules: Snap.Snaplet.Persistent Snap.Snaplet.Auth.Backends.Persistent@@ -42,26 +44,26 @@ build-depends: base >= 4 && < 5,- bytestring >= 0.9.1 && < 0.11,- clientsession >= 0.7.2 && < 0.10,- configurator >= 0.2 && < 0.4,- heist >= 0.14 && < 1.1,- lens >= 3.7.6 && < 5,- errors >= 1.4 && < 2.3,- monad-logger >= 0.2.4 && < 0.4,- mtl >= 2 && < 3,- persistent >= 2.0 && < 2.9,- persistent-postgresql >= 2.0 && < 2.9,- persistent-template >= 2.0 && < 2.6,- readable >= 0.1 && < 0.4,- resource-pool >= 0.2 && < 0.3,- resourcet >= 0.4 && < 1.3,- safe >= 0.3 && < 0.4,- snap >= 0.13 && < 1.2,- text >= 0.11 && < 1.3,- time >= 1.1 && < 1.9,- transformers >= 0.2 && < 0.6,- unordered-containers >= 0.2 && < 0.3,+ bytestring >= 0.9.1,+ clientsession >= 0.7.2,+ configurator >= 0.2,+ heist >= 0.14,+ lens >= 3.7.6,+ errors >= 1.4,+ monad-logger >= 0.2.4,+ mtl >= 2,+ persistent >= 2.0,+ persistent-postgresql >= 2.0,+ persistent-template >= 2.0,+ readable >= 0.1,+ resource-pool >= 0.2,+ resourcet >= 0.4,+ safe >= 0.3,+ snap >= 0.13,+ text >= 0.11,+ time >= 1.1,+ transformers >= 0.2,+ unordered-containers >= 0.2, map-syntax
src/Snap/Snaplet/Auth/Backends/Persistent.hs view
@@ -240,7 +240,7 @@ return $ Right $ au {userUpdatedAt = Just now} - destroy = fail "We don't allow destroying users."+ destroy _ _ = fail "We don't allow destroying users." lookupByUserId PAM{..} (UserId t) = withPool pamPool $ do let k = (mkKey (readT t :: Int))
src/Snap/Snaplet/Auth/Backends/Persistent/Types.hs view
@@ -1,3 +1,4 @@+{-# LANGUAGE DerivingStrategies #-} {-# LANGUAGE EmptyDataDecls #-} {-# LANGUAGE FlexibleContexts #-} {-# LANGUAGE GADTs #-}@@ -5,8 +6,10 @@ {-# LANGUAGE MultiParamTypeClasses #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StandaloneDeriving #-} {-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE UndecidableInstances #-} module Snap.Snaplet.Auth.Backends.Persistent.Types where