diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,5 +1,10 @@
 # Changelog for persistent
 
+## 2.13.3.3
+
+* [#1369](https://github.com/yesodweb/persistent/pull/1369)
+    * Fix `withObject` needing to be imported
+
 ## 2.13.3.2
 
 * [#1315](https://github.com/yesodweb/persistent/pull/1315)
diff --git a/Database/Persist/Sql/Run.hs b/Database/Persist/Sql/Run.hs
--- a/Database/Persist/Sql/Run.hs
+++ b/Database/Persist/Sql/Run.hs
@@ -157,7 +157,7 @@
 -- Upon an exception the transaction is rolled back and the connection
 -- destroyed.
 --
--- This is equivalent to 'runSqlConn but does not incur the 'MonadUnliftIO'
+-- This is equivalent to 'runSqlConn' but does not incur the 'MonadUnliftIO'
 -- constraint, meaning it can be used within, for example, a 'Conduit'
 -- pipeline.
 --
diff --git a/Database/Persist/TH.hs b/Database/Persist/TH.hs
--- a/Database/Persist/TH.hs
+++ b/Database/Persist/TH.hs
@@ -81,6 +81,7 @@
        , (.:)
        , (.:?)
        , (.=)
+       , withObject
        )
 #if MIN_VERSION_aeson(2,0,0)
 import qualified Data.Aeson.Key as Key
@@ -2646,16 +2647,17 @@
     requireExtensions [[FlexibleInstances]]
     pureE <- [|pure|]
     apE' <- [|(<*>)|]
+
+    let objectE = VarE 'object
+        withObjectE = VarE 'withObject
+        dotEqualE = VarE '(.=)
+        dotColonE = VarE '(.:)
+        dotColonQE = VarE '(.:?)
 #if MIN_VERSION_aeson(2,0,0)
-    toKeyE <- [|Key.fromString|]
+        toKeyE = VarE 'Key.fromString
 #else
-    toKeyE <- [|pack|]
+        toKeyE = VarE 'pack
 #endif
-    dotEqualE <- [|(.=)|]
-    dotColonE <- [|(.:)|]
-    dotColonQE <- [|(.:?)|]
-    objectE <- [|object|]
-    withObjectE <- [|withObject|]
     obj <- newName "obj"
     let
         fields =
diff --git a/persistent.cabal b/persistent.cabal
--- a/persistent.cabal
+++ b/persistent.cabal
@@ -1,5 +1,5 @@
 name:            persistent
-version:         2.13.3.2
+version:         2.13.3.3
 license:         MIT
 license-file:    LICENSE
 author:          Michael Snoyman <michael@snoyman.com>
diff --git a/test/Database/Persist/THSpec.hs b/test/Database/Persist/THSpec.hs
--- a/test/Database/Persist/THSpec.hs
+++ b/test/Database/Persist/THSpec.hs
@@ -24,7 +24,7 @@
 module Database.Persist.THSpec where
 
 import Control.Applicative (Const(..))
-import Data.Aeson hiding (Key)
+import Data.Aeson (decode, encode)
 import Data.ByteString.Lazy.Char8 ()
 import Data.Coerce
 import Data.Functor.Identity (Identity(..))