File tree Expand file tree Collapse file tree 1 file changed +8
-7
lines changed
cabal-install/src/Distribution/Client Expand file tree Collapse file tree 1 file changed +8
-7
lines changed Original file line number Diff line number Diff line change @@ -2512,16 +2512,17 @@ elaborateInstallPlan
25122512 shouldBuildInplaceOnly :: SolverPackage loc -> Bool
25132513 shouldBuildInplaceOnly pkg =
25142514 Set. member
2515- (packageId pkg)
2515+ (solverId ( ResolverPackage. Configured pkg) )
25162516 pkgsToBuildInplaceOnly
25172517
2518- pkgsToBuildInplaceOnly :: Set PackageId
2518+ -- The reverse dependencies of solver packages which match a package id in pkgLocalToProject.
2519+ pkgsToBuildInplaceOnly :: Set SolverId
25192520 pkgsToBuildInplaceOnly =
2520- Set. fromList [
2521- packageId pkg
2522- | stage <- stages
2523- , let solverIds = [ PlannedId stage pkgId | pkgId <- Set. toList pkgsLocalToProject]
2524- , pkg <- SolverInstallPlan. reverseDependencyClosure solverPlan solverIds
2521+ Set. fromList
2522+ [ solverId pkg
2523+ | spkg <- SolverInstallPlan. toList solverPlan
2524+ , packageId spkg `elem` pkgsLocalToProject
2525+ , pkg <- SolverInstallPlan. reverseDependencyClosure solverPlan [solverId spkg]
25252526 ]
25262527
25272528 isLocalToProject :: Package pkg => pkg -> Bool
You can’t perform that action at this time.
0 commit comments