Commit 93396185 authored by Duncan Coutts's avatar Duncan Coutts
Browse files

Update for renamed PackageIndex.delete (now .deletePackageId)

parent 1492a94a
......@@ -59,7 +59,7 @@ resolveDependencies os arch comp Nothing available deps =
hideBrokenPackages :: PackageFixedDeps p => PackageIndex p -> PackageIndex p
hideBrokenPackages index =
check (null . PackageIndex.brokenPackages)
. foldr (PackageIndex.delete . packageId) index
. foldr (PackageIndex.deletePackageId . packageId) index
. PackageIndex.reverseDependencyClosure index
. map (packageId . fst)
$ PackageIndex.brokenPackages index
......
......@@ -182,7 +182,7 @@ planLocalPackage verbosity comp configFlags installed available = do
-- dependency on exactly that package. So the resolver ends up having
-- to pick the local package.
available' = PackageIndex.insert localPkg available
installed' = PackageIndex.delete (packageId localPkg) `fmap` installed
installed' = PackageIndex.deletePackageId (packageId localPkg) `fmap` installed
localPkg = AvailablePackage {
packageInfoId = packageId pkg,
Available.packageDescription = pkg,
......
Supports Markdown
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