diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-07-08 03:38:54 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-07-08 03:38:54 +0000 |
commit | e252fa300adc48079a44527f5b8e5a33a14d81a4 (patch) | |
tree | a69cded7be1aa84cf96aa3f9600a714bb7daa00f /src/Text/Pandoc | |
parent | 4e81ef28ed477da5fc608f83d1cbdf7ddd9e561c (diff) | |
download | pandoc-e252fa300adc48079a44527f5b8e5a33a14d81a4.tar.gz |
Fixed bug in Notes ($$ instead of <>), which caused
note blocks to be indented.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@646 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r-- | src/Text/Pandoc/Writers/Man.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Man.hs b/src/Text/Pandoc/Writers/Man.hs index 97b133f1b..9f590f525 100644 --- a/src/Text/Pandoc/Writers/Man.hs +++ b/src/Text/Pandoc/Writers/Man.hs @@ -92,7 +92,7 @@ notesToMan opts notes = if null notes then return empty else mapM (\(num, note) -> noteToMan opts num note) (zip [1..] notes) >>= - (return . (text ".SH NOTES\n" <>) . vcat) + (return . (text ".SH NOTES" $$) . vcat) -- | Return man representation of a note. noteToMan :: WriterOptions -> Int -> [Block] -> State WriterState Doc |