Fix yesterday's fix

we were invoking cabal-helper too early
2015-09-24 04:49:49 +02:00
parent 6710503648
commit 2549bba7b8
3 changed files with 18 additions and 27 deletions
--- a/Language/Haskell/GhcMod/CustomPackageDb.hs
+++ b/Language/Haskell/GhcMod/CustomPackageDb.hs
@@ -19,7 +19,7 @@ parseCustomPackageDb src = map parsePkgDb $ filter (not . null) $ lines src
   parsePkgDb "user" = UserDb
   parsePkgDb s = PackageDb s

-getCustomPkgDbStack :: (IOish m, GmEnv m) => m (Maybe [GhcPkgDb])
+getCustomPkgDbStack :: (MonadIO m, GmEnv m) => m (Maybe [GhcPkgDb])
 getCustomPkgDbStack = do
    mCusPkgDbFile <- liftIO . (traverse readFile <=< findCustomPackageDbFile) . cradleRootDir =<< cradle
    return $ parseCustomPackageDb <$> mCusPkgDbFile