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
This commit is contained in:
fiddlosopher 2007-07-08 03:38:54 +00:00
parent 4e81ef28ed
commit e252fa300a

View file

@ -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