@@ -83,16 +83,6 @@ filterExe name pd = pd {
83 executables = filter (\x -> (exeName x == name)) (executables pd)
83 executables = filter (\x -> (exeName x == name)) (executables pd)
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)
97-- Post Build
87-- Post Build