diff --git a/Annex.hs b/Annex.hs index 3021732f05..e5792fbcb2 100644 --- a/Annex.hs +++ b/Annex.hs @@ -115,7 +115,7 @@ getState = gets {- 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 = modify