diff options
m--------- | data/templates | 12 | ||||
-rw-r--r-- | src/Text/Pandoc/Writers/ConTeXt.hs | 6 |
2 files changed, 13 insertions, 5 deletions
diff --git a/data/templates b/data/templates -Subproject 25ad173f00bc7e07c72468deb1d955f707aeaea +Subproject f0347e7af09f8aad32287b2b2d808cfb57e4e50 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) ] ++ |