diff --git a/Database/Persist/Redis/Internal.hs b/Database/Persist/Redis/Internal.hs
--- a/Database/Persist/Redis/Internal.hs
+++ b/Database/Persist/Redis/Internal.hs
@@ -14,6 +14,7 @@
 import qualified Data.Text as T
 import Control.Monad.Fail (MonadFail)
 
+import Database.Persist.EntityDef.Internal
 import Database.Persist.Class
 import Database.Persist.Types
 import Database.Persist.Redis.Parser
diff --git a/Database/Persist/Redis/Parser.hs b/Database/Persist/Redis/Parser.hs
--- a/Database/Persist/Redis/Parser.hs
+++ b/Database/Persist/Redis/Parser.hs
@@ -1,4 +1,3 @@
-{-# OPTIONS_GHC -fno-warn-deprecations #-} -- Pattern match 'PersistDbSpecific'
 module Database.Persist.Redis.Parser
     ( redisToPerisistValues
     , toValue
@@ -128,9 +127,7 @@
         put x
 
     put (BinPersistValue (PersistArray _)) = throw $ NotSupportedValueType "PersistArray"
-    put (BinPersistValue (PersistDbSpecific _)) = throw $ NotSupportedValueType "PersistDbSpecific"
-    put (BinPersistValue (PersistLiteral _)) = throw $ NotSupportedValueType "PersistLiteral"
-    put (BinPersistValue (PersistLiteralEscaped _)) = throw $ NotSupportedValueType "PersistLiteralEscaped"
+    put (BinPersistValue (PersistLiteral_ _ _)) = throw $ NotSupportedValueType "PersistLiteral_"
     put (BinPersistValue (PersistObjectId _)) = throw $ NotSupportedValueType "PersistObjectId"
 
     get = do
diff --git a/persistent-redis.cabal b/persistent-redis.cabal
--- a/persistent-redis.cabal
+++ b/persistent-redis.cabal
@@ -1,5 +1,5 @@
 name:            persistent-redis
-version:         2.12.0.0
+version:         2.13.0.0
 license:         BSD3
 license-file:    LICENSE
 author:          Pavel Ryzhov <paul@paulrz.cz>