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
@@ -19,13 +19,13 @@
 import Database.Persist.Redis.Parser
 
 toLabel :: FieldDef -> B.ByteString
-toLabel = U.fromString . unpack . unDBName . fieldDB
+toLabel = U.fromString . unpack . unFieldNameDB . fieldDB
 
 toEntityString :: PersistEntity val => val -> Text
-toEntityString = unDBName . entityDB . entityDef . Just
+toEntityString = unEntityNameDB . entityDB . entityDef . Just
 
 toEntityName :: EntityDef -> B.ByteString
-toEntityName = U.fromString . unpack . unDBName . entityDB
+toEntityName = U.fromString . unpack . unEntityNameDB . entityDB
 
 mkEntity :: (MonadFail m, PersistEntity val) => Key val -> [(B.ByteString, B.ByteString)] -> m (Entity val)
 mkEntity key fields = do
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,3 +1,4 @@
+{-# OPTIONS_GHC -fno-warn-deprecations #-} -- Pattern match 'PersistDbSpecific'
 module Database.Persist.Redis.Parser
     ( redisToPerisistValues
     , toValue
@@ -128,6 +129,8 @@
 
     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 (PersistObjectId _)) = throw $ NotSupportedValueType "PersistObjectId"
 
     get = do
diff --git a/Database/Persist/Redis/Store.hs b/Database/Persist/Redis/Store.hs
--- a/Database/Persist/Redis/Store.hs
+++ b/Database/Persist/Redis/Store.hs
@@ -65,7 +65,7 @@
         keyId <- execRedisT $ createKey val
         let textKey = toKeyText val keyId
         key <- liftIO $ toKey textKey
-        _ <- insertKey key val
+        insertKey key val
         return key
 
     insertKey k val = 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.5.2.5
+version:         2.12.0.0
 license:         BSD3
 license-file:    LICENSE
 author:          Pavel Ryzhov <paul@paulrz.cz>
@@ -18,7 +18,7 @@
 
 library
     build-depends:   base                  >= 4.9        && < 5
-                   , persistent            >= 2.5      && < 3.0
+                   , persistent            >= 2.12      && < 3.0
                    , aeson                 >= 1.0
                    , binary                >= 0.8      && < 0.9
                    , bytestring            >= 0.10.8   && < 0.11
@@ -50,7 +50,6 @@
     build-depends:   base                  >= 4.9      && < 5
                    , persistent            >= 2.10     && < 3.0
                    , persistent-redis
-                   , persistent-template   >= 2.7      && < 3.0
                    , aeson                 >= 1.0
                    , bytestring            >= 0.10.8   && < 0.11
                    , binary                >= 0.8      && < 0.9
diff --git a/tests/basic-test.hs b/tests/basic-test.hs
--- a/tests/basic-test.hs
+++ b/tests/basic-test.hs
@@ -1,23 +1,25 @@
-{-# LANGUAGE ExistentialQuantification #-}
+{-# LANGUAGE DataKinds                  #-}
+{-# LANGUAGE DerivingStrategies         #-}
+{-# LANGUAGE ExistentialQuantification  #-}
+{-# LANGUAGE FlexibleInstances          #-}
 {-# LANGUAGE GeneralizedNewtypeDeriving #-}
-{-# LANGUAGE MultiParamTypeClasses #-}
-{-# LANGUAGE QuasiQuotes #-}
-{-# LANGUAGE TemplateHaskell #-}
-{-# LANGUAGE TypeFamilies #-}
-{-# LANGUAGE TypeSynonymInstances #-}
-{-# LANGUAGE UndecidableInstances #-}
-{-# LANGUAGE DerivingStrategies #-}
-{-# LANGUAGE StandaloneDeriving #-}
+{-# LANGUAGE MultiParamTypeClasses      #-}
+{-# LANGUAGE QuasiQuotes                #-}
+{-# LANGUAGE StandaloneDeriving         #-}
+{-# LANGUAGE TemplateHaskell            #-}
+{-# LANGUAGE TypeFamilies               #-}
+{-# LANGUAGE TypeSynonymInstances       #-}
+{-# LANGUAGE UndecidableInstances       #-}
 module Main where
 
-import Control.Monad.IO.Class (MonadIO, liftIO)
-import Data.Text (Text, pack, unpack)
-import qualified Database.Redis as R
-import Language.Haskell.TH.Syntax
+import           Control.Monad.IO.Class     (MonadIO, liftIO)
+import           Data.Text                  (Text, pack, unpack)
+import qualified Database.Redis             as R
+import           Language.Haskell.TH.Syntax
 
-import Database.Persist
-import Database.Persist.Redis
-import Database.Persist.TH
+import           Database.Persist
+import           Database.Persist.Redis
+import           Database.Persist.TH
 
 let redisSettings = mkPersistSettings (ConT ''RedisBackend)
  in share [mkPersist redisSettings] [persistLowerCase|