File tree Expand file tree Collapse file tree 1 file changed +9
-7
lines changed
cabal-install/src/Distribution/Client Expand file tree Collapse file tree 1 file changed +9
-7
lines changed Original file line number Diff line number Diff line change @@ -2461,16 +2461,18 @@ elaborateInstallPlan
2461
2461
shouldBuildInplaceOnly :: SolverPackage loc -> Bool
2462
2462
shouldBuildInplaceOnly pkg =
2463
2463
Set. member
2464
- (packageId pkg)
2464
+ (solverId ( ResolverPackage. Configured pkg) )
2465
2465
pkgsToBuildInplaceOnly
2466
2466
2467
- pkgsToBuildInplaceOnly :: Set PackageId
2467
+
2468
+ -- The reverse dependencies of solver packages which match a package id in pkgLocalToProject.
2469
+ pkgsToBuildInplaceOnly :: Set SolverId
2468
2470
pkgsToBuildInplaceOnly =
2469
- Set. fromList [
2470
- packageId pkg
2471
- | stage <- stages
2472
- , let solverIds = [ PlannedId stage pkgId | pkgId <- Set. toList pkgsLocalToProject]
2473
- , pkg <- SolverInstallPlan. reverseDependencyClosure solverPlan solverIds
2471
+ Set. fromList
2472
+ [ solverId pkg
2473
+ | spkg <- SolverInstallPlan. toList solverPlan
2474
+ , packageId spkg `elem` pkgsLocalToProject
2475
+ , pkg <- SolverInstallPlan. reverseDependencyClosure solverPlan [solverId spkg]
2474
2476
]
2475
2477
2476
2478
isLocalToProject :: Package pkg => pkg -> Bool
You can’t perform that action at this time.
0 commit comments