@@ -83,16 +83,6 @@ filterExe name pd = pd {
8383 executables = filter (\x -> (exeName x == name)) (executables pd)
8484 }
8585
86−-- It's not enough to fix the PackageDescription, we also have to fix the
87−-- LocalBuildInfo. This includes the component build order (data ComponentName)
88−-- which is horribly internal.
89−filterLBI :: String -> LocalBuildInfo -> LocalBuildInfo
90−filterLBI name lbi = lbi {
91− libraryConfig = Nothing,
92− compBuildOrder = [CExeName name],
93− executableConfigs = filter (\a -> (fst a == name)) (executableConfigs lbi)
94− }
95−
9686
9787-- Post Build
9888