diff --git a/snaplet-hdbc.cabal b/snaplet-hdbc.cabal
--- a/snaplet-hdbc.cabal
+++ b/snaplet-hdbc.cabal
@@ -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
diff --git a/src/Snap/Snaplet/Auth/Backends/Hdbc.hs b/src/Snap/Snaplet/Auth/Backends/Hdbc.hs
--- a/src/Snap/Snaplet/Auth/Backends/Hdbc.hs
+++ b/src/Snap/Snaplet/Auth/Backends/Hdbc.hs
@@ -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.