diff options
| -rw-r--r-- | CabalHelper/Main.hs | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/CabalHelper/Main.hs b/CabalHelper/Main.hs index 35af775..077eaab 100644 --- a/CabalHelper/Main.hs +++ b/CabalHelper/Main.hs @@ -229,11 +229,8 @@ main = do pkgDbStr UserPackageDB = "U" pkgDbStr (SpecificPackageDB s) = "S" ++ s - res <- map (\(c, opts) -> (c, map pkgDbStr $ ghcOptPackageDBs opts)) - <$> componentOptions' lvd False [] (\_ _ x -> return x) id - -- TODO: Setup.hs has access to the sandbox as well: ghc-mod#478 - return $ Just $ ChResponseCompList $ (res :: [(ChComponentName, [String])]) ++ [(ChSetupHsName, [])] + return $ Just $ ChResponseList $ map pkgDbStr $ withPackageDB lbi "entrypoints":[] -> do eps <- componentsMap lbi v distdir $ \c clbi bi -> |