diff options
| -rw-r--r-- | utils/ghc-cabal/Main.hs | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/utils/ghc-cabal/Main.hs b/utils/ghc-cabal/Main.hs index 99f34d9e6e..8cc1d1a34a 100644 --- a/utils/ghc-cabal/Main.hs +++ b/utils/ghc-cabal/Main.hs @@ -229,12 +229,7 @@ doRegister directory distDir ghc ghcpkg topdir progs' <- configurePrograms [ghcProgram', ghcPkgProgram'] progs instInfos <- dump (hcPkgInfo progs') verbosity GlobalPackageDB let installedPkgs' = PackageIndex.fromList instInfos - let updateComponentConfig (clbi, deps) - = (updateComponentLocalBuildInfo clbi, deps) - updateComponentLocalBuildInfo clbi = clbi -- TODO: remove - ccs' = map updateComponentConfig (componentsConfigs lbi) - lbi' = lbi { - componentsConfigs = ccs', + let lbi' = lbi { installedPkgs = installedPkgs', installDirTemplates = idts, withPrograms = progs' |