fcd35cc · typeable/pandoc

man/make-pandoc-man-pages.hs+3−1

@@ -47,8 +47,10 @@ makeManPage verbose page meta blocks = do

47

48writeManPage :: FilePath -> String -> Pandoc -> IO ()

49writeManPage page templ doc = do

50+ let version = pandocVersion

50 let opts = def{ writerStandalone = True

51 let opts = def{ writerStandalone = True

51− , writerTemplate = templ }

52+ , writerTemplate = templ

53+ , writerVariables = [("version",version)] }

52 let manPage = writeMan opts $

54 let manPage = writeMan opts $

53 bottomUp (concatMap removeLinks) $

55 bottomUp (concatMap removeLinks) $

54 bottomUp capitalizeHeaders doc

56 bottomUp capitalizeHeaders doc

man/man1/pandoc.1.template+1−1

@@ -1,7 +1,7 @@

1$if(has-tables)$

2.\"t

3$endif$

4−.TH PANDOC 1 "$date$" "$title$"

4+.TH PANDOC 1 "$date$" "$version$"

5.SH NAME

6pandoc - general markup converter

7$body$

man/man5/pandoc_markdown.5.template+1−1

@@ -1,7 +1,7 @@

1$if(has-tables)$

2.\"t

3$endif$

4−.TH PANDOC_MARKDOWN 5 "$date$" "$title$"

4+.TH PANDOC_MARKDOWN 5 "$date$" "$version$"

5.SH NAME

6pandoc_markdown - markdown syntax for pandoc(1)

7.SH DESCRIPTION