aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Writers/ConTeXt.hs6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Writers/ConTeXt.hs b/src/Text/Pandoc/Writers/ConTeXt.hs
index df11d79cc..c67daf13d 100644
--- a/src/Text/Pandoc/Writers/ConTeXt.hs
+++ b/src/Text/Pandoc/Writers/ConTeXt.hs
@@ -74,6 +74,12 @@ pandocToConTeXt options (Pandoc (Meta title authors date) blocks) = do
let main = (render colwidth . vcat) body
let context = writerVariables options ++
[ ("toc", if writerTableOfContents options then "yes" else "")
+ , ("placelist", intercalate "," $
+ take (writerTOCDepth options + if writerChapters options
+ then 0
+ else 1)
+ ["chapter","section","subsection","subsubsection",
+ "subsubsubsection","subsubsubsubsection"])
, ("body", main)
, ("title", titletext)
, ("date", datetext) ] ++