diff --git a/ChangeLog.md b/ChangeLog.md --- a/ChangeLog.md +++ b/ChangeLog.md @@ -1,11 +1,18 @@ # Changelog for persistent +## 2.14.3.0 + +* [#1425](https://github.com/yesodweb/persistent/pull/1425) + * Introduce an alias `setPsUseSnakeCaseForeignKeys` for + `setPsUseSnakeCaseForiegnKeys` due to a typo in the latter; + deprecate `setPsUseSnakeCaseForiegnKeys` + ## 2.14.2.0 * [#1421](https://github.com/yesodweb/persistent/pull/1421) * Add `mpsCamelCaseCompositeKeySelector` field to `MkPersistSettings`, which define the style of the entity's composite key. - + ## 2.14.1.0 * [#1418](https://github.com/yesodweb/persistent/pull/1418/) diff --git a/Database/Persist/Quasi.hs b/Database/Persist/Quasi.hs --- a/Database/Persist/Quasi.hs +++ b/Database/Persist/Quasi.hs @@ -941,9 +941,16 @@ -- between the entity name and the constraint name when -- creating a foreign key constraint name -- +-- @since 2.14.2.0 +setPsUseSnakeCaseForeignKeys :: PersistSettings -> PersistSettings +setPsUseSnakeCaseForeignKeys = setPsToFKName (toFKNameInfixed "_") + +-- Equivalent to 'setPsUseSnakeCaseForeignKeys', but misspelled. +-- -- @since 2.13.0.0 setPsUseSnakeCaseForiegnKeys :: PersistSettings -> PersistSettings -setPsUseSnakeCaseForiegnKeys = setPsToFKName (toFKNameInfixed "_") +setPsUseSnakeCaseForiegnKeys = setPsUseSnakeCaseForeignKeys +{-# DEPRECATED setPsUseSnakeCaseForiegnKeys "use the correctly spelled, equivalent, setPsUseSnakeCaseForeignKeys instead" #-} -- | Retrieve whether or not the 'PersistSettings' will generate code with -- strict fields. diff --git a/persistent.cabal b/persistent.cabal --- a/persistent.cabal +++ b/persistent.cabal @@ -1,5 +1,5 @@ name: persistent -version: 2.14.2.0 +version: 2.14.3.0 license: MIT license-file: LICENSE author: Michael Snoyman