persistent-sqlite 2.0.4 → 2.0.5

raw patch · 2 files changed

+5/−5 lines, 2 filesdep ~persistent

Dependency ranges changed: persistent

Files

• Database/Persist/Sqlite.hs +3/−3
• persistent-sqlite.cabal +2/−2

@@ -124,7 +124,7 @@         where           sel = T.concat               [ "SELECT "-              , escape $ sqlIdName ent+              , escape $ fieldDB (entityId ent)               , " FROM "               , escape $ entityDB ent               , " WHERE _ROWID_=last_insert_rowid()"@@ -228,7 +228,7 @@     let oldCols = map DBName $ filter (/= "id") oldCols' -- need to update for table id attribute ?     let newCols = filter (not . safeToRemove def) $ map cName cols     let common = filter (`elem` oldCols) newCols-    let id_ = sqlIdName def+    let id_ = fieldDB (entityId def)     return [ (False, tmpSql)            , (False, copyToTemp $ id_ : common)            , (common /= filter (not . safeToRemove def) oldCols, dropOld)@@ -295,7 +295,7 @@         , " TABLE "         , escape $ entityDB entity         , "("-        , escape $ sqlIdName entity+        , escape $ fieldDB (entityId entity)         , " "         , showSqlType $ fieldSqlType $ entityId entity         ," PRIMARY KEY"

@@ -1,5 +1,5 @@ name:            persistent-sqlite-version:         2.0.4+version:         2.0.5 license:         MIT license-file:    LICENSE author:          Michael Snoyman <michael@snoyman.com>@@ -24,7 +24,7 @@     build-depends:   base                    >= 4         && < 5                    , bytestring              >= 0.9.1                    , transformers            >= 0.2.1-                   , persistent              >= 2.0.4     && < 2.1+                   , persistent              >= 2.0.5     && < 2.1                    , monad-control           >= 0.2                    , containers              >= 0.2                    , text                    >= 0.7