From b96a8c6457d322503186aa73a6ff77808881f61e Mon Sep 17 00:00:00 2001 From: Kazu Yamamoto Date: Mon, 22 Sep 2014 10:46:46 +0900 Subject: [PATCH] check does not use overrideGhcUserOptions again. - workaround for #376 - logically reverting ec1b115cc1d3d2341201a97b0b9f2dda5da9f660 --- Language/Haskell/GhcMod/Check.hs | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/Language/Haskell/GhcMod/Check.hs b/Language/Haskell/GhcMod/Check.hs index 86d50f0..19b4264 100644 --- a/Language/Haskell/GhcMod/Check.hs +++ b/Language/Haskell/GhcMod/Check.hs @@ -30,10 +30,15 @@ checkSyntax files = either id id <$> check files check :: IOish m => [FilePath] -- ^ The target files. -> GhcModT m (Either String String) +{- check fileNames = overrideGhcUserOptions $ \ghcOpts -> do withLogger (setAllWarningFlags . setNoMaxRelevantBindings . Gap.setWarnTypedHoles . Gap.setDeferTypeErrors) $ do _ <- G.setSessionDynFlags =<< addCmdOpts ghcOpts =<< G.getSessionDynFlags setTargetFiles fileNames +-} +check fileNames = + withLogger (setAllWarningFlags . setNoMaxRelevantBindings) $ + setTargetFiles fileNames ----------------------------------------------------------------