diff options
| -rw-r--r-- | src/Text/Pandoc/Writers/ConTeXt.hs | 2 | ||||
| -rw-r--r-- | src/headers/ConTeXtHeader | 13 |
2 files changed, 11 insertions, 4 deletions
diff --git a/src/Text/Pandoc/Writers/ConTeXt.hs b/src/Text/Pandoc/Writers/ConTeXt.hs index dec33c9e0..8e35ea9d5 100644 --- a/src/Text/Pandoc/Writers/ConTeXt.hs +++ b/src/Text/Pandoc/Writers/ConTeXt.hs @@ -115,7 +115,7 @@ blockToConTeXt (Plain lst) = inlineListToConTeXt lst >>= (return . (++ "\n")) blockToConTeXt (Para lst) = inlineListToConTeXt lst >>= (return . (++ "\n\n")) blockToConTeXt (BlockQuote lst) = do contents <- blockListToConTeXt lst - return $ "\\startnarrower\n" ++ contents ++ "\\stopnarrower\n\n" + return $ "\\startblockquote\n" ++ contents ++ "\\stopblockquote\n\n" blockToConTeXt (CodeBlock str) = return $ "\\starttyping\n" ++ str ++ "\n\\stoptyping\n" blockToConTeXt (RawHtml str) = return "" diff --git a/src/headers/ConTeXtHeader b/src/headers/ConTeXtHeader index 7a27b38d8..c04daed65 100644 --- a/src/headers/ConTeXtHeader +++ b/src/headers/ConTeXtHeader @@ -4,9 +4,10 @@ \setupinteraction[state=start, color=middlered] % needed for hyperlinks \setuppapersize[letter][letter] % use letter paper -\setuplayout[width=6in, height=9.5in] % page layout -\setuppagenumbering[location={footer,center}, style=bold] % number pages -\setupbodyfont[11pt] % 11pt font +\setuplayout[width=middle, backspace=1.5in, cutspace=1.5in, + height=middle, header=0.75in, footer=0.75in] % page layout +\setuppagenumbering[location={footer,center}] % number pages +\setupbodyfont[12pt] % 12pt font \setupwhitespace[medium] % inter-paragraph spacing \setuphead[section][style=\tfc] @@ -52,3 +53,9 @@ \setupthinrules[width=15em] % width of horizontal rules +% for block quotations +\definestartstop [blockquote] + [before={\startnarrower\switchtobodyfont[11pt] + \whitespace\setupindenting[no]}, + after={\stopnarrower\whitespace}] + |