Skip to content
Snippets Groups Projects
Commit d36fe8c9 authored by Mikhail Glushenkov's avatar Mikhail Glushenkov
Browse files

80-col violation.

parent cca1cbc4
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
cabal-install/Distribution/Client/Freeze.hs
+ 2
− 1
View file @ d36fe8c9
......@@ -171,7 +171,8 @@ pruneInstallPlan :: InstallPlan.InstallPlan
-> [PackageSpecifier SourcePackage]
-> Either [PlanPackage] [(PlanPackage, [PackageIdentifier])]
pruneInstallPlan installPlan pkgSpecifiers =
mapLeft PackageIndex.allPackages $ PackageIndex.dependencyClosure pkgIdx pkgIds
mapLeft PackageIndex.allPackages $
PackageIndex.dependencyClosure pkgIdx pkgIds
where
pkgIdx = PackageIndex.fromList $ InstallPlan.toList installPlan
pkgIds = [ packageId pkg | SpecificSourcePackage pkg <- pkgSpecifiers ]
......
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