aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2014-08-30 16:11:45 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2014-08-30 16:11:45 -0700
commitfcd35cc955f37eaedaa0fb8f45c78f3d2b888147 (patch)
treeb636af0d9784b66e70394f016de557bcd110b34f
parent58b32107ada21128d740c694e363526ddd5fedc8 (diff)
downloadpandoc-fcd35cc955f37eaedaa0fb8f45c78f3d2b888147.tar.gz
Put version in lower-left corner of man pages.
-rw-r--r--man/make-pandoc-man-pages.hs4
-rw-r--r--man/man1/pandoc.1.template2
-rw-r--r--man/man5/pandoc_markdown.5.template2
3 files changed, 5 insertions, 3 deletions
diff --git a/man/make-pandoc-man-pages.hs b/man/make-pandoc-man-pages.hs
index afba9135a..65178a15b 100644
--- a/man/make-pandoc-man-pages.hs
+++ b/man/make-pandoc-man-pages.hs
@@ -47,8 +47,10 @@ makeManPage verbose page meta blocks = do
writeManPage :: FilePath -> String -> Pandoc -> IO ()
writeManPage page templ doc = do
+ let version = pandocVersion
let opts = def{ writerStandalone = True
- , writerTemplate = templ }
+ , writerTemplate = templ
+ , writerVariables = [("version",version)] }
let manPage = writeMan opts $
bottomUp (concatMap removeLinks) $
bottomUp capitalizeHeaders doc
diff --git a/man/man1/pandoc.1.template b/man/man1/pandoc.1.template
index 167d6ed8c..00e7675e7 100644
--- a/man/man1/pandoc.1.template
+++ b/man/man1/pandoc.1.template
@@ -1,7 +1,7 @@
$if(has-tables)$
.\"t
$endif$
-.TH PANDOC 1 "$date$" "$title$"
+.TH PANDOC 1 "$date$" "$version$"
.SH NAME
pandoc - general markup converter
$body$
diff --git a/man/man5/pandoc_markdown.5.template b/man/man5/pandoc_markdown.5.template
index f775a4683..6006e90c4 100644
--- a/man/man5/pandoc_markdown.5.template
+++ b/man/man5/pandoc_markdown.5.template
@@ -1,7 +1,7 @@
$if(has-tables)$
.\"t
$endif$
-.TH PANDOC_MARKDOWN 5 "$date$" "$title$"
+.TH PANDOC_MARKDOWN 5 "$date$" "$version$"
.SH NAME
pandoc_markdown - markdown syntax for pandoc(1)
.SH DESCRIPTION