Implemented --toc-level in LaTeX writer.

2 files changed, 9 insertions, 7 deletions

diff --git a/data/templates b/data/templates
-Subproject 9601cc502644458c7ddf71394f8e4be74c46442
+Subproject d541256441c14601977192c2415003b5b357a10
diff --git a/src/Text/Pandoc/Writers/LaTeX.hs b/src/Text/Pandoc/Writers/LaTeX.hs
index 3d25e0fc9..f93c168b7 100644
--- a/src/Text/Pandoc/Writers/LaTeX.hs
+++ b/src/Text/Pandoc/Writers/LaTeX.hs
@@ -131,6 +131,10 @@ pandocToLaTeX options (Pandoc (Meta title authors date) blocks) = do
                          _      -> []
       context  = writerVariables options ++
                  [ ("toc", if writerTableOfContents options then "yes" else "")
+                 , ("toc-level", show (writerTOCLevel options -
+                                       if writerChapters options
+                                          then 1
+                                          else 0))
                  , ("body", main)
                  , ("title", titletext)
                  , ("title-meta", stringify title)