diff --git a/apiary-clientsession.cabal b/apiary-clientsession.cabal
--- a/apiary-clientsession.cabal
+++ b/apiary-clientsession.cabal
@@ -1,5 +1,5 @@
 name:                apiary-clientsession
-version:             0.11.0
+version:             0.11.1
 synopsis:            clientsession support for apiary web framework.
 description:
   examples:
@@ -27,8 +27,8 @@
   other-extensions:    
   build-depends:       base               >=4.6   && <4.8
                      , bytestring         >=0.10  && <0.11
-                     , apiary             >=0.9   && <0.12
-                     , apiary-cookie      >=0.9   && <0.12
+                     , apiary             >=0.9   && <0.13
+                     , apiary-cookie      >=0.9   && <0.13
                      , clientsession      >=0.9   && <0.10
                      , time               >=1.4   && <1.5
                      , data-default-class >=0.0   && <0.1
@@ -38,9 +38,6 @@
                      , cprng-aes          >=0.5   && <0.6
                      , base64-bytestring  >=1.0   && <1.1
                      , http-types         >=0.8   && <0.9
-
-  if impl(ghc < 7.8)
-    build-depends:     tagged             >=0.7 && <0.8
 
   hs-source-dirs:      src
   ghc-options:         -O2 -Wall
diff --git a/src/Web/Apiary/ClientSession.hs b/src/Web/Apiary/ClientSession.hs
--- a/src/Web/Apiary/ClientSession.hs
+++ b/src/Web/Apiary/ClientSession.hs
@@ -26,7 +26,6 @@
 import Data.Reflection
 import qualified Data.ByteString as S
 import Control.Monad.Apiary.Filter.Internal.Strategy
-import Data.Proxy
 
 type HasSession = Given I.Session
 
@@ -46,7 +45,7 @@
 csrfToken = I.csrfToken given
 
 session :: (Functor n, MonadIO n, Strategy w, Query a, HasSession)
-        => S.ByteString -> Proxy (w a)
+        => S.ByteString -> proxy (w a)
         -> ApiaryT (SNext w as a) n m b -> ApiaryT as n m b
 session = I.session given
 
diff --git a/src/Web/Apiary/ClientSession/Internal.hs b/src/Web/Apiary/ClientSession/Internal.hs
--- a/src/Web/Apiary/ClientSession/Internal.hs
+++ b/src/Web/Apiary/ClientSession/Internal.hs
@@ -20,7 +20,6 @@
 import Web.Apiary.Cookie
 import Web.Apiary.Cookie.Internal
 import Web.ClientSession 
-import Data.Proxy
 import Data.Maybe
 import Data.Time
 import Data.Default.Class
@@ -129,8 +128,8 @@
                            }
 
 session :: (Functor n, MonadIO n, Strategy w, Query a) => Session
-        -> S.ByteString -> Proxy (w a) -> ApiaryT (SNext w as a) n m b -> ApiaryT as n m b
-session sess k p = focus $ \l -> do
+        -> S.ByteString -> proxy (w a) -> ApiaryT (SNext w as a) n m b -> ApiaryT as n m b
+session sess k p = focus id $ \l -> do
     r   <- getRequest
     t   <- liftIO getCurrentTime
     let mbr = readStrategy readQuery ((k ==) . fst) p
@@ -141,7 +140,7 @@
            => Session
            -> ApiaryT c n m a
            -> ApiaryT c n m a
-checkToken sess@Session{..} = focus $ \l -> do
+checkToken sess@Session{..} = focus id $ \l -> do
     r <- getRequest
     p <- getReqParams