From e729dbc1077d1a78779709caa783528bc7772745 Mon Sep 17 00:00:00 2001 From: Adam Vogt Date: Sat, 3 Apr 2010 20:13:54 +0200 Subject: Update util/GenerateManpage to be pandoc-1.4 compatible Ignore-this: 3f5efd5786ef0182a6f86494d1d933c9 darcs-hash:20100403181354-1499c-56cae48d86405d346010fb6d0d20afa71f1caa4c.gz --- util/GenerateManpage.hs | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/util/GenerateManpage.hs b/util/GenerateManpage.hs index 9c7e2e0..e0acb31 100644 --- a/util/GenerateManpage.hs +++ b/util/GenerateManpage.hs @@ -76,19 +76,23 @@ main = do . lines <$> readFile "./man/xmonad.1.markdown" + Right template <- getDefaultTemplate "man" writeFile "./man/xmonad.1" . (manHeader ++) - . writeMan writeOpts + . writeMan writeOpts{ writerStandalone = True, writerTemplate = template } $ parsed putStrLn "Documentation created: man/xmonad.1" + Right template <- getDefaultTemplate "html" writeFile "./man/xmonad.1.html" . writeHtmlString writeOpts - { writerHeader = "

"++releaseName++"

"++ - "

Section: xmonad manual (1)
"++ + { writerIncludeBefore = + "

"++releaseName++"

"++ + "

Section: xmonad manual (1)
"++ "Updated: "++releaseDate++"

"++ - "
" + "
" , writerStandalone = True + , writerTemplate = template , writerTableOfContents = True } $ parsed putStrLn "Documentation created: man/xmonad.1.html" -- cgit v1.2.3