Fix missing liftIO

2015-08-21 04:21:27 +02:00 · 2015-08-21 04:21:27 +02:00 · c5db06af0f
commit c5db06af0f
parent 65b3d78d2f
1 changed files with 1 additions and 1 deletions
--- a/Language/Haskell/GhcMod/Cradle.hs
+++ b/Language/Haskell/GhcMod/Cradle.hs
@ -83,7 +83,7 @@ stackCradle wdir = do

    -- If dist/setup-config already exists the user probably wants to use cabal
    -- rather than stack, or maybe that's just me ;)
-    mCabalSetupCfg <- mightExist $ setupConfigPath "dist"
+    mCabalSetupCfg <- liftIO $ mightExist $ setupConfigPath "dist"
    when (isJust mCabalSetupCfg) $ mzero

    distDir <- MaybeT $ getStackDistDir cabalDir