diff --git a/src/Network/Wai/Middleware/Cache/Redis.hs b/src/Network/Wai/Middleware/Cache/Redis.hs
--- a/src/Network/Wai/Middleware/Cache/Redis.hs
+++ b/src/Network/Wai/Middleware/Cache/Redis.hs
@@ -74,11 +74,12 @@
             --   @304@-responses.
     -> CacheBackend
 redisBackend cInfo db cachePrefix ttlFn tagsFn keyFn eTagFn app req = do
-    rawRes <- liftIO $ do
+    rawRes <- liftIO $  do
         conn <- R.connect cInfo
         R.runRedis conn $ do
             void $ R.select db
-            pile cachePrefix key eTag (Just "response") $ runResourceT $ do
+            pile cachePrefix key eTag (Just "response") $ 
+                        liftIO $ runResourceT $ do
                 res <- app req
                 case res of
                     (ResponseFile _ _ fp part) -> lift $ 
diff --git a/wai-middleware-cache-redis.cabal b/wai-middleware-cache-redis.cabal
--- a/wai-middleware-cache-redis.cabal
+++ b/wai-middleware-cache-redis.cabal
@@ -1,5 +1,5 @@
 name:           wai-middleware-cache-redis
-version:        0.1.3
+version:        0.1.4
 cabal-version:  >= 1.8
 build-type:     Simple
 stability:      Experimental
@@ -28,7 +28,7 @@
                    conduit >= 0.2 && < 0.3,
                    cryptohash,
                    hedis >= 0.3 && < 0.4,
-                   hedis-pile >= 0.3.1,
+                   hedis-pile >= 0.4.0,
                    hex,
                    http-types >= 0.6 && < 0.7,
                    transformers >= 0.2 && < 0.3,