X-Git-Url: http://git.lukelau.me/?p=lsp-test.git;a=blobdiff_plain;f=src%2FLanguage%2FHaskell%2FLSP%2FTest%2FSession.hs;h=b38d1b7fe1d4885de1354036be174aa10f484c93;hp=6a9a6d50d51ef738c37b0250a9a9744add532049;hb=269f303e5e44fba835c51eacfca622c488a06b9f;hpb=600388d3b0320b4f9374e8a781743877f4e263c7 diff --git a/src/Language/Haskell/LSP/Test/Session.hs b/src/Language/Haskell/LSP/Test/Session.hs index 6a9a6d5..b38d1b7 100644 --- a/src/Language/Haskell/LSP/Test/Session.hs +++ b/src/Language/Haskell/LSP/Test/Session.hs @@ -66,10 +66,11 @@ data SessionConfig = SessionConfig { capabilities :: ClientCapabilities -- ^ Specific capabilities the client should advertise. Default is yes to everything. , timeout :: Int -- ^ Maximum time to wait for a request in seconds. Defaults to 60. + , logStdErr :: Bool -- ^ When True redirects the servers stderr output to haskell-lsp-test's stdout. Defaults to False } instance Default SessionConfig where - def = SessionConfig def 60 + def = SessionConfig def 60 False class Monad m => MonadSessionConfig m where sessionConfig :: m SessionConfig