summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers/ConTeXt.hs
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-11-16 04:04:53 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-11-16 04:04:53 +0000
commit13d8a75060b8528ee2a2e2d6cace9ff0590bcff2 (patch)
tree5545145b53360001605d7099c1559837400edec4 /src/Text/Pandoc/Writers/ConTeXt.hs
parent87d6d0d069fc24724ee55cf54711c8abe2f2d072 (diff)
New, "official" definition of blockquote environment in ConTeXt header.
Also, use blank line after \startblockquote to balance blank line at the end. git-svn-id: https://pandoc.googlecode.com/svn/trunk@1078 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text/Pandoc/Writers/ConTeXt.hs')
-rw-r--r--src/Text/Pandoc/Writers/ConTeXt.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/ConTeXt.hs b/src/Text/Pandoc/Writers/ConTeXt.hs
index fbe677323..b8173e6af 100644
--- a/src/Text/Pandoc/Writers/ConTeXt.hs
+++ b/src/Text/Pandoc/Writers/ConTeXt.hs
@@ -121,7 +121,7 @@ blockToConTeXt opts (Para lst) =
wrapTeXIfNeeded opts (inlineListToConTeXt opts) lst >>= return . (<> char '\n')
blockToConTeXt opts (BlockQuote lst) = do
contents <- blockListToConTeXt opts lst
- return $ text "\\startblockquote" $$ contents $$ text "\\stopblockquote"
+ return $ text "\\startblockquote\n" $$ contents $$ text "\\stopblockquote"
blockToConTeXt opts (CodeBlock str) =
return $ text $ "\\starttyping\n" ++ str ++ "\n\\stoptyping\n" -- \n needed
-- because \stoptyping can't have anything after it