@@ -4,7 +4,7 @@ import Distribution.Simple
44import Distribution.Simple.PreProcess
55import Distribution.Simple.Setup
66 (copyDest, copyVerbosity, fromFlag, installVerbosity, BuildFlags(..))
7−import Distribution.PackageDescription (PackageDescription(..), Executable(..), BuildInfo(..))
7+import Distribution.PackageDescription (PackageDescription(..), Executable(..))
88import Distribution.Simple.LocalBuildInfo
99 (LocalBuildInfo(..), absoluteInstallDirs)
1010import Distribution.Verbosity ( Verbosity, silent )
@@ -19,19 +19,18 @@ import System.Exit
1919main :: IO ()
2020main = do
2121 defaultMainWithHooks $ simpleUserHooks {
22− buildHook = \pkgdescr ->
23− (buildHook simpleUserHooks) pkgdescr{ executables =
24− [x | x <- executables pkgdescr,
25− exeName x /= "make-pandoc-man-pages"] ++
26− [x{ buildInfo = (buildInfo x){ buildable = True } }
27− | x <- executables pkgdescr,
28− exeName x == "make-pandoc-man-pages"] }
29− , postBuild = makeManPages
22+ postBuild = makeManPages
3023 , postCopy = \ _ flags pkg lbi ->
3124 installManpages pkg lbi (fromFlag $ copyVerbosity flags)
3225 (fromFlag $ copyDest flags)
3326 , postInst = \ _ flags pkg lbi ->
3427 installManpages pkg lbi (fromFlag $ installVerbosity flags) NoCopyDest
28+ , copyHook = \pkgdescr ->
29+ (copyHook simpleUserHooks) pkgdescr{ executables =
30+ [x | x <- executables pkgdescr, exeName x /= "make-pandoc-man-pages"] }
31+ , instHook = \pkgdescr ->
32+ (instHook simpleUserHooks) pkgdescr{ executables =
33+ [x | x <- executables pkgdescr, exeName x /= "make-pandoc-man-pages"] }
3534 , hookedPreProcessors = [ppBlobSuffixHandler]
3635 }
3736 exitWith ExitSuccess