persistent 2.0.3 → 2.0.3.1

raw patch · 2 files changed

+3/−3 lines, 2 files

Files

• Database/Persist/Quasi.hs +2/−2
• persistent.cabal +1/−1

@@ -349,7 +349,7 @@       , fieldType = FTTypeCon Nothing $ keyConName $ unHaskellName entName       , fieldSqlType = idSqlType       -- the primary field is actually a reference to the entity-      , fieldReference = ForeignRef entName (FTTypeCon Nothing "Int64")+      , fieldReference = ForeignRef entName (FTTypeCon Nothing "Int")       , fieldAttrs = []       , fieldStrict = True       }@@ -425,7 +425,7 @@     addDefaultIdType = takeColsEx ps (field : keyCon : rest `mappend` setIdName)     setFieldDef = fmap (\fd ->       let refFieldType = if fieldType fd == FTTypeCon Nothing keyCon-              then FTTypeCon Nothing "Int64"+              then FTTypeCon Nothing "Int"               else fieldType fd       in fd { fieldReference = ForeignRef (HaskellName tableName) $ refFieldType             })

@@ -1,5 +1,5 @@ name:            persistent-version:         2.0.3+version:         2.0.3.1 license:         MIT license-file:    LICENSE author:          Michael Snoyman <michael@snoyman.com>