Skip to content

Commit d5dea06

Browse files
committed
wip: comment out hideInstalledPackagesAllVersions and hideInstalledPackagesAllVersions
1 parent e1fed4a commit d5dea06

File tree

1 file changed

+8
-8
lines changed

1 file changed

+8
-8
lines changed

cabal-install/src/Distribution/Client/Dependency.hs

Lines changed: 8 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -498,13 +498,13 @@ hideInstalledPackagesAllVersions
498498
:: [PackageName]
499499
-> DepResolverParams
500500
-> DepResolverParams
501-
hideInstalledPackagesAllVersions pkgnames params =
501+
hideInstalledPackagesAllVersions _pkgnames _params = error "we shouldn't be using this"
502502
-- TODO: this should work using exclude constraints instead
503-
params
504-
{ depResolverInstalledPkgIndex =
505-
fmap (\idx -> foldl' (flip InstalledPackageIndex.deletePackageName) idx pkgnames)
506-
(depResolverInstalledPkgIndex params)
507-
}
503+
-- params
504+
-- { depResolverInstalledPkgIndex =
505+
-- fmap (\idx -> foldl' (flip InstalledPackageIndex.deletePackageName) idx pkgnames)
506+
-- (depResolverInstalledPkgIndex params)
507+
-- }
508508

509509
-- | Remove upper bounds in dependencies using the policy specified by the
510510
-- 'AllowNewer' argument (all/some/none).
@@ -704,8 +704,8 @@ basicInstallPolicy
704704
(concatMap pkgSpecifierConstraints pkgSpecifiers)
705705
. addTargets
706706
(map pkgSpecifierTarget pkgSpecifiers)
707-
. hideInstalledPackagesSpecificBySourcePackageId
708-
[packageId pkg | SpecificSourcePackage pkg <- pkgSpecifiers]
707+
-- . hideInstalledPackagesSpecificBySourcePackageId
708+
-- [packageId pkg | SpecificSourcePackage pkg <- pkgSpecifiers]
709709
. addSourcePackages
710710
[pkg | SpecificSourcePackage pkg <- pkgSpecifiers]
711711
$ basicDepResolverParams

0 commit comments

Comments
 (0)