diff --git a/persistent-postgresql/Database/Persist/Postgresql.hs b/persistent-postgresql/Database/Persist/Postgresql.hs index 73c967fb9..970e9772f 100644 --- a/persistent-postgresql/Database/Persist/Postgresql.hs +++ b/persistent-postgresql/Database/Persist/Postgresql.hs @@ -1865,7 +1865,7 @@ excludeNotEqualToOriginal field = -- Called thusly, this method will insert a new record (if none exists) OR update a recordField with a new value -- assuming the condition in the last block is met. -- --- -- @since 2.12.1.0 +-- @since 2.12.1.0 upsertManyWhere :: forall record backend m. ( backend ~ PersistEntityBackend record, @@ -1874,14 +1874,10 @@ upsertManyWhere :: PersistEntity record, MonadIO m ) => - -- | A list of the records you want to insert, or update - [record] -> - -- | A list of the fields you want to copy over. - [HandleUpdateCollision record] -> - -- | A list of the updates to apply that aren't dependent on the record being inserted. - [Update record] -> - -- | A filter condition that dictates the scope of the updates - [Filter record] -> + [record] -> -- ^ A list of the records you want to insert, or update + [HandleUpdateCollision record] -> -- ^ A list of the fields you want to copy over. + [Update record] -> -- ^ A list of the updates to apply that aren't dependent on the record being inserted. + [Filter record] -> -- ^ A filter condition that dictates the scope of the updates ReaderT backend m () upsertManyWhere [] _ _ _ = return () upsertManyWhere records fieldValues updates filters = do