getConfig runs "cabal configure" first if setup-config is invalid.

2014-09-23 21:28:03 +09:00
parent 7db266c22d
commit c4929c54af
7 changed files with 91 additions and 109 deletions
--- a/Language/Haskell/GhcMod/Find.hs
+++ b/Language/Haskell/GhcMod/Find.hs
@@ -135,8 +135,7 @@ ghcModExecutable = do _ <- getExecutablePath' -- get rid of unused warning when
 dumpSymbol :: IOish m => GhcModT m String
 dumpSymbol = do
    crdl <- cradle
-    dflags <- G.getSessionDynFlags
-    dir <- liftIO $ getPackageCachePath crdl dflags
+    dir <- liftIO $ getPackageCachePath crdl
    let cache = dir </> symbolCache
        pkgdb = dir </> packageCache