Fix resolved component caching

2015-04-12 02:39:18 +02:00
parent ca79f99c3e
commit 39a8ded102
3 changed files with 29 additions and 16 deletions
--- a/Language/Haskell/GhcMod/CabalHelper.hs
+++ b/Language/Haskell/GhcMod/CabalHelper.hs
@@ -74,7 +74,7 @@ cabalHelperCache :: MonadIO m => Cached m
                      [GmComponent GMCRaw ChEntrypoint]
 cabalHelperCache = Cached {
    cacheFile = cabalHelperCacheFile,
-    cachedAction = \ _ (progs, root, _) ->
+    cachedAction = \ _ (progs, root, _) _ ->
      runQuery' progs root $ do
        q <- liftM5 join5
               ghcOptions