diff --git a/hedis-monadic.cabal b/hedis-monadic.cabal
--- a/hedis-monadic.cabal
+++ b/hedis-monadic.cabal
@@ -1,5 +1,5 @@
 name:                hedis-monadic
-version:             0.0.1
+version:             0.0.2
 synopsis:            A la MonadReader for Redis connection
 license:             BSD3
 license-file:        LICENSE
diff --git a/src/Database/Redis/Monadic.hs b/src/Database/Redis/Monadic.hs
--- a/src/Database/Redis/Monadic.hs
+++ b/src/Database/Redis/Monadic.hs
@@ -23,6 +23,10 @@
 import Control.Monad.Writer
 import Database.Redis
 
+#if MIN_VERSION_transformers(0,4,0) && !(MIN_VERSION_mtl(2,2,1))
+import Control.Monad.Trans.Except
+#endif
+
 #if MIN_VERSION_mtl(2,2,1)
 import Control.Monad.Except
 #else
@@ -45,7 +49,16 @@
     {-# INLINEABLE getRedis #-}                \
 }
 
+#if MIN_VERSION_transformers_base(0,4,4)
 HASREDIS(ExceptT e)
+#endif
+
+#if !(MIN_VERSION_mtl(2,2,1))
+instance (Error e, HasRedis m) => HasRedis (ErrorT e m) where
+    getRedis = lift getRedis
+    {-# INLINEABLE getRedis #-}
+#endif
+
 HASREDIS(IdentityT)
 HASREDIS(MaybeT)
 HASREDIS(ReaderT r)