Ensure unique list of build tools

This commit is contained in:
Michael Snoyman 2013-01-29 16:25:20 +02:00
parent a2f2434fc9
commit e479c6473c

View File

@ -49,6 +49,8 @@ iiBuildTools InstallInfo { iiPackageDB = PackageDB m, iiPackages = packages } =
$ topSort $ topSort
$ map addDependencies $ map addDependencies
$ filter (flip Set.notMember coreTools . fst) $ filter (flip Set.notMember coreTools . fst)
$ Set.toList
$ Set.fromList
$ mapMaybe (flip Map.lookup buildToolMap) $ mapMaybe (flip Map.lookup buildToolMap)
$ Set.toList $ Set.toList
$ Set.unions $ Set.unions