style fix

This commit is contained in:
Jose Duran 2019-09-30 15:19:20 -05:00
parent ba650748f0
commit ced45b0c4e
3 changed files with 2 additions and 3 deletions

View File

@ -49,7 +49,6 @@ library
, bytestring
, conduit >=1.3
, monad-logger
, mtl
, persistent >=2.10.0 && <2.11
, resourcet >=1.2
, tagged >=0.2

View File

@ -2883,4 +2883,4 @@ insertSelect = void . insertSelectCount
-- | Insert a 'PersistField' for every selected value, return the count afterward
insertSelectCount :: (MonadIO m, PersistEntity a) =>
SqlQuery (SqlExpr (Insertion a)) -> SqlWriteT m Int64
insertSelectCount = rawEsqueleto INSERT_INTO . fmap EInsertFinal
insertSelectCount = rawEsqueleto INSERT_INTO . fmap EInsertFinal

View File

@ -147,4 +147,4 @@ import Database.Persist.Sql hiding
, selectKeysList, deleteCascadeWhere, (=.), (+=.), (-=.), (*=.), (/=.)
, (==.), (!=.), (<.), (>.), (<=.), (>=.), (<-.), (/<-.), (||.)
, listToJSON, mapToJSON, getPersistMap, limitOffsetOrder, selectSource
, update , count)
, update , count )