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 @@ -2463,16 +2463,18 @@ elaborateInstallPlan
2463
2463
shouldBuildInplaceOnly :: SolverPackage loc -> Bool
2464
2464
shouldBuildInplaceOnly pkg =
2465
2465
Set. member
2466
- (packageId pkg)
2466
+ (solverId ( ResolverPackage. Configured pkg) )
2467
2467
pkgsToBuildInplaceOnly
2468
2468
2469
- pkgsToBuildInplaceOnly :: Set PackageId
2469
+
2470
+ -- The reverse dependencies of solver packages which match a package id in pkgLocalToProject.
2471
+ pkgsToBuildInplaceOnly :: Set SolverId
2470
2472
pkgsToBuildInplaceOnly =
2471
- Set. fromList [
2472
- packageId pkg
2473
- | stage <- stages
2474
- , let solverIds = [ PlannedId stage pkgId | pkgId <- Set. toList pkgsLocalToProject]
2475
- , pkg <- SolverInstallPlan. reverseDependencyClosure solverPlan solverIds
2473
+ Set. fromList
2474
+ [ solverId pkg
2475
+ | spkg <- SolverInstallPlan. toList solverPlan
2476
+ , packageId spkg `elem` pkgsLocalToProject
2477
+ , pkg <- SolverInstallPlan. reverseDependencyClosure solverPlan [solverId spkg]
2476
2478
]
2477
2479
2478
2480
isLocalToProject :: Package pkg => pkg -> Bool
You can’t perform that action at this time.
0 commit comments