diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-02-16 00:41:30 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-02-16 00:44:51 -0400 |
| commit | a1e52f0ce5984058c737ed709fc5d4b6398e019a (patch) | |
| tree | baaeb46b5eb5e7edb4a8a4ef80d6c1ab256bbcba /Messages.hs | |
| parent | e7aaa55c53fb54c6dd5a1a1aeb0955b05227676b (diff) | |
hlint
Diffstat (limited to 'Messages.hs')
| -rw-r--r-- | Messages.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Messages.hs b/Messages.hs index 982b9313c..1b51cf23e 100644 --- a/Messages.hs +++ b/Messages.hs @@ -132,7 +132,7 @@ handle json normal = Annex.getState Annex.output >>= go where go Annex.NormalOutput = liftIO normal go Annex.QuietOutput = q - go Annex.JSONOutput = liftIO $ flushed $ json + go Annex.JSONOutput = liftIO $ flushed json q :: Monad m => m () q = return () |