Stderr output pre-GhcModT for stack cradle

2015-08-31 07:33:36 +02:00
parent 2a0414f368
commit 0b65487e50
13 changed files with 189 additions and 161 deletions
--- a/Language/Haskell/GhcMod/Info.hs
+++ b/Language/Haskell/GhcMod/Info.hs
@@ -36,7 +36,7 @@ info file expr =
  ghandle handler $
    runGmlT' [Left file] deferErrors $
      withInteractiveContext $
-        convert <$> options <*> body
+        convert . outputOpts <$> options <*> body
  where
    handler (SomeException ex) = do
      gmLog GmException "info" $ text "" $$ nest 4 (showDoc ex)