persistent-sqlite 2.13.1.0 → 2.13.1.1
raw patch · 4 files changed
+10/−3 lines, 4 files
Files
- ChangeLog.md +5/−0
- Database/Persist/Sqlite.hs +1/−2
- persistent-sqlite.cabal +1/−1
- test/main.hs +3/−0
ChangeLog.md view
@@ -1,5 +1,10 @@ # Changelog for persistent-sqlite +## 2.13.1.1++* [#1459](https://github.com/yesodweb/persistent/pull/1459)+ * Make use of `CautiousMigration` type alias for clarity.+ ## 2.13.1.0 * [#1341](https://github.com/yesodweb/persistent/pull/1341)
Database/Persist/Sqlite.hs view
@@ -112,7 +112,6 @@ import Database.Persist.SqlBackend import qualified Database.Sqlite as Sqlite - -- | Create a pool of SQLite connections. -- -- Note that this should not be used with the @:memory:@ connection string, as@@ -442,7 +441,7 @@ :: [EntityDef] -> (Text -> IO Statement) -> EntityDef- -> IO (Either [Text] [(Bool, Text)])+ -> IO (Either [Text] CautiousMigration) migrate' allDefs getter val = do let (cols, uniqs, fdefs) = sqliteMkColumns allDefs val let newSql = mkCreateTable False def (filter (not . safeToRemove val . cName) cols, uniqs, fdefs)
persistent-sqlite.cabal view
@@ -1,5 +1,5 @@ name: persistent-sqlite-version: 2.13.1.0+version: 2.13.1.1 license: MIT license-file: LICENSE author: Michael Snoyman <michael@snoyman.com>
test/main.hs view
@@ -45,6 +45,7 @@ import qualified RenameTest import qualified SumTypeTest import qualified TransactionLevelTest+import qualified TypeLitFieldDefsTest import qualified UniqueTest import qualified UpsertTest @@ -162,6 +163,7 @@ , UniqueTest.uniqueMigrate , MaxLenTest.maxlenMigrate , MaybeFieldDefsTest.maybeFieldDefMigrate+ , TypeLitFieldDefsTest.typeLitFieldDefsMigrate , Recursive.recursiveMigrate , CompositeTest.compositeMigrate , MigrationTest.migrationMigrate@@ -209,6 +211,7 @@ UniqueTest.specsWith db MaxLenTest.specsWith db MaybeFieldDefsTest.specsWith db+ TypeLitFieldDefsTest.specsWith db Recursive.specsWith db SumTypeTest.specsWith db (Just (runMigrationSilent SumTypeTest.sumTypeMigrate)) MigrationOnlyTest.specsWith db