diff --git a/snaplet-redis.cabal b/snaplet-redis.cabal
--- a/snaplet-redis.cabal
+++ b/snaplet-redis.cabal
@@ -1,5 +1,5 @@
 Name:                snaplet-redis
-Version:             0.1.0.2
+Version:             0.1.0.3
 Synopsis:            Redis support for Snap Framework
 Description:         This package provides a snaplet which exposes
                      interface to Redis in-memory key-value storage as
@@ -30,9 +30,8 @@
 
   Build-depends:
     base                >= 4 && < 5,
-    data-lens           >= 2.0.1 && < 2.11,
-    data-lens-template  == 2.1.*,
+    lens                == 3.8.*,
     hedis               == 0.6.*,
     mtl                 >= 2 && < 3,
-    snap                == 0.9.*,
+    snap                == 0.11.*,
     transformers        == 0.3.*
diff --git a/src/Snap/Snaplet/RedisDB.hs b/src/Snap/Snaplet/RedisDB.hs
--- a/src/Snap/Snaplet/RedisDB.hs
+++ b/src/Snap/Snaplet/RedisDB.hs
@@ -1,5 +1,6 @@
 {-# LANGUAGE OverloadedStrings #-}
 {-# LANGUAGE TemplateHaskell #-}
+{-# LANGUAGE Rank2Types #-}
 
 {-|
 
@@ -14,13 +15,9 @@
 
 where
 
-import Prelude hiding ((.))
-import Control.Category ((.))
+import Control.Lens
 import Control.Monad.State
 
-import Data.Lens.Common
-import Data.Lens.Template
-
 import Database.Redis
 
 import Snap.Snaplet
@@ -32,7 +29,7 @@
     { _connection :: Connection -- ^ DB connection pool.
     }
 
-makeLens ''RedisDB
+makeLenses ''RedisDB
 
 
 ------------------------------------------------------------------------------
@@ -42,9 +39,9 @@
 -- > runRedisDB database $ do
 -- >   set "hello" "world"
 runRedisDB :: (MonadIO m, MonadState app m) =>
-               Lens app (Snaplet RedisDB) -> Redis a -> m a
+               Simple Lens app (Snaplet RedisDB) -> Redis a -> m a
 runRedisDB snaplet action = do
-  c <- gets $ getL (connection . snapletValue . snaplet)
+  c <- gets $ view (snaplet . snapletValue . connection)
   liftIO $ runRedis c action