From 627c54011b9492ab60d6080be3316187d13614b5 Mon Sep 17 00:00:00 2001
From: John MacFarlane <fiddlosopher@gmail.com>
Date: Tue, 8 Oct 2013 20:52:56 -0700
Subject: Revert "Setup.hs: Better way of handling man page building."

This reverts commit ed061b91c8e3247e1d3b1538eca24687adf0e575.
---
 Setup.hs | 17 ++++++++---------
 1 file changed, 8 insertions(+), 9 deletions(-)

(limited to 'Setup.hs')

diff --git a/Setup.hs b/Setup.hs
index e2779e65b..4245df203 100644
--- a/Setup.hs
+++ b/Setup.hs
@@ -4,7 +4,7 @@ import Distribution.Simple
 import Distribution.Simple.PreProcess
 import Distribution.Simple.Setup
          (copyDest, copyVerbosity, fromFlag, installVerbosity, BuildFlags(..))
-import Distribution.PackageDescription (PackageDescription(..), Executable(..), BuildInfo(..))
+import Distribution.PackageDescription (PackageDescription(..), Executable(..))
 import Distribution.Simple.LocalBuildInfo
          (LocalBuildInfo(..), absoluteInstallDirs)
 import Distribution.Verbosity ( Verbosity, silent )
@@ -19,19 +19,18 @@ import System.Exit
 main :: IO ()
 main = do
   defaultMainWithHooks $ simpleUserHooks {
-      buildHook = \pkgdescr ->
-         (buildHook simpleUserHooks) pkgdescr{ executables =
-            [x | x <- executables pkgdescr,
-                 exeName x /= "make-pandoc-man-pages"] ++
-            [x{ buildInfo = (buildInfo x){ buildable = True } }
-               | x <- executables pkgdescr,
-                 exeName x == "make-pandoc-man-pages"] }
-    , postBuild = makeManPages
+      postBuild = makeManPages
     , postCopy = \ _ flags pkg lbi ->
          installManpages pkg lbi (fromFlag $ copyVerbosity flags)
               (fromFlag $ copyDest flags)
     , postInst = \ _ flags pkg lbi ->
          installManpages pkg lbi (fromFlag $ installVerbosity flags) NoCopyDest
+    , copyHook = \pkgdescr ->
+         (copyHook simpleUserHooks) pkgdescr{ executables =
+            [x | x <- executables pkgdescr, exeName x /= "make-pandoc-man-pages"] }
+    , instHook = \pkgdescr ->
+         (instHook simpleUserHooks) pkgdescr{ executables =
+            [x | x <- executables pkgdescr, exeName x /= "make-pandoc-man-pages"] }
     , hookedPreProcessors = [ppBlobSuffixHandler]
     }
   exitWith ExitSuccess
-- 
cgit v1.2.3