mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Get rid of unnecessary Monad constraint

Browse source
This commit is contained in:
Gabor Greif 2016-01-27 14:50:33 +01:00 committed by Joey Hess
parent daf8aa76fe
commit 6c3c8e63d0
Failed to extract signature
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Types/NumCopies.hs
View file

@ -111,7 +111,7 @@ invalidatableVerifiedCopy mk u check = do
-- Constructs a VerifiedCopy, and runs the action, ensuring that the -- Constructs a VerifiedCopy, and runs the action, ensuring that the
-- verified copy is invalidated when the action returns, or on error. -- verified copy is invalidated when the action returns, or on error.
withVerifiedCopy withVerifiedCopy
:: (Monad m, MonadMask m, MonadIO m, ToUUID u) :: (MonadMask m, MonadIO m, ToUUID u)
=> (V -> VerifiedCopy) => (V -> VerifiedCopy)
-> u -> u
-> IO Bool -> IO Bool