aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-07-08 03:54:07 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-07-08 03:54:07 +0000
commitdfcae807b07e585e91b1b3a9981bd7ad9543f53e (patch)
treed86e29a4084b01cdfc2eb7918031b06cc82966b7 /src/Text/Pandoc
parente58a55eb41b3f8e9c3a2a2a91ca12b8ec24a15fd (diff)
downloadpandoc-dfcae807b07e585e91b1b3a9981bd7ad9543f53e.tar.gz
Man writer: Don't print .\" t at beginning unless we're
in --standalone mode. git-svn-id: https://pandoc.googlecode.com/svn/trunk@650 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Writers/Man.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Man.hs b/src/Text/Pandoc/Writers/Man.hs
index 9f590f525..f0cc3c707 100644
--- a/src/Text/Pandoc/Writers/Man.hs
+++ b/src/Text/Pandoc/Writers/Man.hs
@@ -58,7 +58,7 @@ pandocToMan opts (Pandoc meta blocks) = do
(head, foot) <- metaToMan opts meta
body <- blockListToMan opts blocks
(notes, preprocessors) <- get
- let preamble = if null preprocessors
+ let preamble = if null preprocessors || not (writerStandalone opts)
then empty
else text $ ".\\\" " ++ concat (nub preprocessors)
notes' <- notesToMan opts (reverse notes)