summaryrefslogtreecommitdiff
path: root/Setup.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Setup.hs')
-rw-r--r--Setup.hs17
1 files changed, 17 insertions, 0 deletions
diff --git a/Setup.hs b/Setup.hs
index 6db3b1aec..03e3248ef 100644
--- a/Setup.hs
+++ b/Setup.hs
@@ -31,6 +31,8 @@ main :: IO ()
main = defaultMainWithHooks $ simpleUserHooks {
-- enable hsb2hs preprocessor for .hsb files
hookedPreProcessors = [ppBlobSuffixHandler]
+ , postBuild = \args bf pkgdescr lbi ->
+ makeManPages args bf pkgdescr lbi
}
ppBlobSuffixHandler :: PPSuffixHandler
@@ -45,3 +47,18 @@ ppBlobSuffixHandler = ("hsb", \_ _ ->
Nothing -> error "hsb2hs is needed to build this program: cabal install hsb2hs"
return ()
})
+
+makeManPages :: Args -> BuildFlags -> PackageDescription -> LocalBuildInfo
+ -> IO ()
+makeManPages _ bf _ LocalBuildInfo{buildDir=buildDir}
+ = do info verbosity "Creating data/pandoc.1"
+ rawSystemExit verbosity progPath args
+ where verbosity = fromFlagOrDefault normal $ buildVerbosity bf
+ progPath = buildDir </> "pandoc" </> "pandoc"
+ args = ["README", "-t", "man", "-s",
+ "--template", "man/pandoc.1.template",
+ "--filter", "man/capitalizeHeaders.hs",
+ "--filter", "man/removeNotes.hs",
+ "--filter", "man/removeLinks.hs",
+ "-o", "data/pandoc.1"]
+