lee/pandoc
1
0
Fork 0
mirror of https://github.com/jgm/pandoc.git synced 2026-09-24 08:25:52 +00:00
Code Issues Packages Projects Releases Wiki Activity

ConTeXt writer: Ensure cr after \stoptyping.

Browse Source
This commit is contained in:
John MacFarlane
2011-01-22 23:26:44 -08:00
parent ea5cd35004
commit d562efa39d
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Text/Pandoc/Writers/ConTeXt.hs
+1 -1
View File
@@ -122,7 +122,7 @@ blockToConTeXt (BlockQuote lst) = do
contents <- blockListToConTeXt lst
return $ "\\startblockquote" $$ nest 0 contents $$ "\\stopblockquote" <> blankline
blockToConTeXt (CodeBlock _ str) =
return $ "\\starttyping" <> cr <> flush (text str) <> cr <> "\\stoptyping" <> blankline
return $ "\\starttyping" <> cr <> flush (text str) <> cr <> "\\stoptyping" $$ blankline
-- blankline because \stoptyping can't have anything after it, inc. '}'
blockToConTeXt (RawHtml _) = return empty
blockToConTeXt (BulletList lst) = do