Sandwich new Monad layer GmOutT into transformer stack
This way we can have access to some options pre Cradle setup which should fix the output interleaving problems I was observing.
This commit is contained in:
@@ -20,7 +20,7 @@ lint :: IOish m
|
||||
lint file = do
|
||||
opt <- options
|
||||
withMappedFile file $ \tempfile ->
|
||||
liftIO (hlint $ tempfile : "--quiet" : hlintOpts opt)
|
||||
liftIO (hlint $ tempfile : "--quiet" : optHlintOpts opt)
|
||||
>>= mapM (replaceFileName tempfile)
|
||||
>>= ghandle handler . pack
|
||||
where
|
||||
|
||||
Reference in New Issue
Block a user