diff options
| author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-11-16 04:04:53 +0000 |
|---|---|---|
| committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-11-16 04:04:53 +0000 |
| commit | 13d8a75060b8528ee2a2e2d6cace9ff0590bcff2 (patch) | |
| tree | 5545145b53360001605d7099c1559837400edec4 | |
| parent | 87d6d0d069fc24724ee55cf54711c8abe2f2d072 (diff) | |
| download | pandoc-13d8a75060b8528ee2a2e2d6cace9ff0590bcff2.tar.gz | |
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
| -rw-r--r-- | src/Text/Pandoc/Writers/ConTeXt.hs | 2 | ||||
| -rw-r--r-- | src/headers/ConTeXtHeader | 22 |
2 files changed, 19 insertions, 5 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 diff --git a/src/headers/ConTeXtHeader b/src/headers/ConTeXtHeader index 41648081c..a0b3a0a56 100644 --- a/src/headers/ConTeXtHeader +++ b/src/headers/ConTeXtHeader @@ -54,8 +54,22 @@ \setupthinrules[width=15em] % width of horizontal rules % for block quotations -\definestartstop [blockquote] - [before={\startnarrower\switchtobodyfont[11pt] - \whitespace\setupindenting[no]}, - after={\stopnarrower\whitespace}] +\unprotect + +\startvariables all +blockquote: blockquote +\stopvariables + +\definedelimitedtext +[\v!blockquote][\v!quotation] +\setupdelimitedtext +[\v!blockquote] +[\c!left=, +\c!right=, +before={\blank[medium]}, +after={\blank[medium]}, +] + +\protect + |