snaplet-hdbc 0.7.2.2 → 0.7.2.3

raw patch · 2 files changed

+5/−2 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• snaplet-hdbc.cabal +1/−1
• src/Snap/Snaplet/Auth/Backends/Hdbc.hs +4/−1

@@ -1,5 +1,5 @@ name:           snaplet-hdbc-version:        0.7.2.2+version:        0.7.2.3 synopsis:       HDBC snaplet for Snap Framework description:    This snaplet consists of two parts: an HDBC abstraction snaplet                 and an HDBC authentication backend for Snap's authentication

@@ -21,6 +21,7 @@ import            Snap.Snaplet.Auth import            Snap.Snaplet.Hdbc.Types import            Snap.Snaplet.Session+import            Snap.Snaplet.Session.Common import            Web.ClientSession  -- | Initialises this HDBC snaplet. It automatically configures a resource@@ -40,6 +41,7 @@                Nothing $ liftIO $ do   mv   <- newEmptyMVar   key  <- getKey (asSiteKey s)+  rng  <- mkRNG   return AuthManager     {  backend = HdbcAuthManager (HdbcSnaplet conn mv) tbl qs     ,  session = l@@ -48,7 +50,8 @@     ,  rememberCookieName = asRememberCookieName s     ,  rememberPeriod = asRememberPeriod s     ,  siteKey = key-    ,  lockout = asLockout s }+    ,  lockout = asLockout s+    ,  randomNumberGenerator = rng }  -- | Authmanager state containing the resource pool and the table/query -- configuration.