hlint
This commit is contained in:
parent
e7aaa55c53
commit
a1e52f0ce5
18 changed files with 36 additions and 37 deletions
|
@ -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 ()
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue