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
commitdfcae807b07e585e91b1b3a9981bd7ad9543f53e
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>
dateSun 8 Jul 2007, 03:54 (19 years ago)
parente58a55e
src/Text/Pandoc/Writers/Man.hs+1−1
@@ -58,7 +58,7 @@ pandocToMan opts (Pandoc meta blocks) = do
5858 (head, foot) <- metaToMan opts meta
5959 body <- blockListToMan opts blocks
6060 (notes, preprocessors) <- get
61− let preamble = if null preprocessors
61+ let preamble = if null preprocessors || not (writerStandalone opts)
6262 then empty
6363 else text $ ".\\\" " ++ concat (nub preprocessors)
6464 notes' <- notesToMan opts (reverse notes)