Fix prepareCabalHelper when dist/ doesn't exist yet

2015-08-14 04:28:22 +02:00 · 2015-08-14 04:28:22 +02:00 · f998c63c73
commit f998c63c73
parent 0b5de23ac9
1 changed files with 1 additions and 1 deletions
--- a/Language/Haskell/GhcMod/CabalHelper.hs
+++ b/Language/Haskell/GhcMod/CabalHelper.hs
@ -133,7 +133,7 @@ prepareCabalHelper = do
  let projdir = cradleRootDir crdl
      distdir = projdir </> "dist"
  readProc <- gmReadProcess
-  liftIO $ prepare readProc projdir distdir
+  withCabal $ liftIO $ prepare readProc projdir distdir

 withCabal :: (IOish m, GmEnv m, GmLog m) => m a -> m a
 withCabal action = do