Commit c2644509 authored by Edward Z. Yang's avatar Edward Z. Yang
Browse files

Bug fix: packagesThatDependOn should go through the fake map.

This fix got dropped shuffling PRs around when we committed
ff6c718b
parent b8b7080b
......@@ -367,10 +367,11 @@ failed pkgid buildResult buildResult' plan = assert (invariant plan') plan'
--
packagesThatDependOn :: InstallPlan
-> InstalledPackageId -> [PlanPackage]
packagesThatDependOn plan = map (planPkgOf plan)
packagesThatDependOn plan pkgid = map (planPkgOf plan)
. tail
. Graph.reachable (planGraphRev plan)
. planVertexOf plan
$ Map.findWithDefault pkgid pkgid (planFakeMap plan)
-- | Lookup a package that we expect to be in the processing state.
--
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment