persistent 2.13.3.2 → 2.13.3.3
raw patch · 5 files changed
+17/−10 lines, 5 files
Files
- ChangeLog.md +5/−0
- Database/Persist/Sql/Run.hs +1/−1
- Database/Persist/TH.hs +9/−7
- persistent.cabal +1/−1
- test/Database/Persist/THSpec.hs +1/−1
ChangeLog.md view
@@ -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)
Database/Persist/Sql/Run.hs view
@@ -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. --
Database/Persist/TH.hs view
@@ -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 =
persistent.cabal view
@@ -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>
test/Database/Persist/THSpec.hs view
@@ -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(..))