hasufell/ghc-mod
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix <7.10

Browse Source
This commit is contained in:
Daniel Gröber 2015-09-01 10:45:15 +02:00
parent e32eaf1434
commit a0a7433212
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Language/Haskell/GhcMod/Output.hs
View File

@ -66,7 +66,7 @@ toGmLines s = GmLines GmPartial s
outputFns :: (GmOut m, MonadIO m') outputFns :: (GmOut m, MonadIO m')
=> m (GmLines String -> m' (), GmLines String -> m' ()) => m (GmLines String -> m' (), GmLines String -> m' ())
outputFns = outputFns =
outputFns' <$> gmoAsk outputFns' `liftM` gmoAsk
pfxFns :: Maybe (String, String) -> (GmLines String -> GmLines String, GmLines String -> GmLines String) pfxFns :: Maybe (String, String) -> (GmLines String -> GmLines String, GmLines String -> GmLines String)
pfxFns lpfx = case lpfx of pfxFns lpfx = case lpfx of