fix comment

This commit is contained in:
Joey Hess 2011-12-20 16:03:09 -04:00
parent f30d545256
commit 3d188d8db9

View file

@ -115,7 +115,7 @@ getState = gets
{- Applies a state mutation function to change the internal state. {- Applies a state mutation function to change the internal state.
- -
- Example: changeState $ \s -> s { quiet = True } - Example: changeState $ \s -> s { output = QuietOutput }
-} -}
changeState :: (AnnexState -> AnnexState) -> Annex () changeState :: (AnnexState -> AnnexState) -> Annex ()
changeState = modify changeState = modify