diff --git a/animalgame/src/Application.hs b/animalgame/src/Application.hs
--- a/animalgame/src/Application.hs
+++ b/animalgame/src/Application.hs
@@ -35,7 +35,7 @@
     setHeistState s a = a { templateState = s }
 
 instance HasMemorySessionManager AppState where
-    type MemorySessionValue AppState = AppSession
+    type MemorySession AppState = AppSession
     memorySessionMgr = sessionMgr
 
 data AppSession = AppSession {
diff --git a/clientcount/src/Application.hs b/clientcount/src/Application.hs
--- a/clientcount/src/Application.hs
+++ b/clientcount/src/Application.hs
@@ -36,7 +36,7 @@
     setHeistState s a = a { templateState = s }
 
 instance HasClientSessionManager AppState where
-    type ClientSessionValue AppState = Int
+    type ClientSession AppState = Int
     clientSessionMgr = sessionMgr
 
 sessionKey :: ByteString
@@ -46,5 +46,5 @@
 appInitializer = do
     hPath    <- liftIO $ getDataFileName "clientcount/resources/templates"
     heist    <- heistInitializer hPath
-    sessions <- clientSessionInitializer sessionKey 0 (Just 10)
+    sessions <- clientSessionInitializer sessionKey (Just 10) (return 0)
     return $ AppState heist sessions
diff --git a/mysnapsession-example.cabal b/mysnapsession-example.cabal
--- a/mysnapsession-example.cabal
+++ b/mysnapsession-example.cabal
@@ -1,5 +1,5 @@
 Name:                mysnapsession-example
-Version:             0.3
+Version:             0.3.1
 Synopsis:            Example projects using mysnapsession
 Description:         This is a collection of simple web applications that use
                      the mysnapsession package for stateful HTTP.
@@ -34,7 +34,7 @@
     snap >= 0.3 && < 0.4,
     snap-core >= 0.3 && < 0.4,
     snap-server >= 0.3 && <0.4,
-    mysnapsession == 0.3.*,
+    mysnapsession == 0.3.1,
     clientsession == 0.4.*
 
   Ghc-options: -threaded -Wall -fwarn-tabs -funbox-strict-fields
