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

pasto

Browse source
This commit is contained in:
Joey Hess 2012-11-02 12:48:52 -04:00
parent 70b9d3ae68
commit ec7a51727a
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
Utility/Monad.hs
View file

@ -46,8 +46,8 @@ ma <||> mb = ifM ma ( return True , mb )
ma <&&> mb = ifM ma ( mb , return False )
{- Same fixity as && and || -}
infixr 3 (<&&>)
infixr 2 (<||>)
infixr 3 <&&>
infixr 2 <||>
{- Runs an action, passing its value to an observer before returning it. -}
observe :: Monad m => (a -> m b) -> m a -> m a