@@ -158,7 +158,13 @@ defaultPackageOverrides :: [Dependency]
158defaultPackageOverrides = map (\s -> maybe (error (show s ++ " is not a valid override selector")) id (simpleParse s))
158defaultPackageOverrides = map (\s -> maybe (error (show s ++ " is not a valid override selector")) id (simpleParse s))
159 [ "mtl == 2.1.*"
159 [ "mtl == 2.1.*"
160 , "monad-control == 0.3.*"
160 , "monad-control == 0.3.*"
162+ [ Dependency n (thisVersion v) | PackageIdentifier n v <- corePackages ]
163+ -- TODO: This is necessary because otherwise we may end up having a
164+ -- version that's "too new" in the default package set. The problem
165+ -- is that we don't want those packages generated, really, so maybe
166+ -- we should remove them from the final package set after the
167+ -- resover has been constructed?
163-- These packages are added to the generated set, but the play no role during dependency resolution.
169-- These packages are added to the generated set, but the play no role during dependency resolution.
164extraPackages :: [Dependency]
170extraPackages :: [Dependency]