diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,5 +1,14 @@
 ## Unreleased changes
 
+## 2.13.1.2
+
+* [#1367](https://github.com/yesodweb/persistent/pull/1367),
+  [#1366](https://github.com/yesodweb/persistent/pull/1367),
+  [#1338](https://github.com/yesodweb/persistent/pull/1338),
+  [#1335](https://github.com/yesodweb/persistent/pull/1335)
+    * Support GHC 9.2
+* Test migration idempotency on additional integer types [#1359](https://github.com/yesodweb/persistent/pull/1359)
+
 ## 2.13.1.0
 
 * Support `persistent-2.13.3.0` [#1341](https://github.com/yesodweb/persistent/pull/1341)
diff --git a/persistent-test.cabal b/persistent-test.cabal
--- a/persistent-test.cabal
+++ b/persistent-test.cabal
@@ -1,5 +1,5 @@
 name:            persistent-test
-version:         2.13.1.0
+version:         2.13.1.2
 license:         MIT
 license-file:    LICENSE
 author:          Michael Snoyman <michael@snoyman.com>
diff --git a/src/DataTypeTest.hs b/src/DataTypeTest.hs
--- a/src/DataTypeTest.hs
+++ b/src/DataTypeTest.hs
@@ -49,7 +49,7 @@
 cleanDB' = deleteWhere ([] :: [Filter (DataTypeTableGeneric backend)])
 
 roundFn :: RealFrac a => a -> Integer
-roundFn = round
+roundFn = truncate
 
 roundTime :: TimeOfDay -> TimeOfDay
 roundTime t = timeToTimeOfDay $ fromIntegral $ roundFn $ timeOfDayToTime t
diff --git a/src/MigrationIdempotencyTest.hs b/src/MigrationIdempotencyTest.hs
--- a/src/MigrationIdempotencyTest.hs
+++ b/src/MigrationIdempotencyTest.hs
@@ -2,6 +2,7 @@
 {-# LANGUAGE UndecidableInstances #-}
 module MigrationIdempotencyTest where
 
+import Data.Int (Int32, Int64)
 import qualified Data.Text as T
 
 import Database.Persist.TH
@@ -9,13 +10,15 @@
 
 share [mkPersist sqlSettings, mkMigrate "migration"] [persistLowerCase|
 Idempotency
-    field1 Int
+    field1 Int64
     field2 T.Text sqltype=varchar(5)
     field3 T.Text sqltype=mediumtext
     field4 T.Text sqltype=longtext
     field5 T.Text sqltype=mediumblob
     field6 T.Text sqltype=longblob
     field7 Double sqltype=double(6,5)
+    field8 Int32
+    field9 Bool
 |]
 
 specsWith :: (MonadIO m) => RunDb SqlBackend m -> Spec