diff options
| author | niszet <niszet0016@gmail.com> | 2020-09-25 01:28:38 +0900 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2020-09-24 09:28:38 -0700 |
| commit | 1f707da40fa2a916fe6f8f86720494eadfc5ae9e (patch) | |
| tree | 9c4f575025fa86c9d4b0382c9c2cfed5b611e86b | |
| parent | 09d39e0e98258bf74c019623d1b2a63661d57dde (diff) | |
| download | pandoc-1f707da40fa2a916fe6f8f86720494eadfc5ae9e.tar.gz | |
Support toc-depth option for ODT writer (#6697)
To support `--toc-depth` option for ODT, writer and template are
updated. Closes #6696.
| -rw-r--r-- | data/templates/default.opendocument | 2 | ||||
| -rw-r--r-- | src/Text/Pandoc/Writers/OpenDocument.hs | 1 |
2 files changed, 2 insertions, 1 deletions
diff --git a/data/templates/default.opendocument b/data/templates/default.opendocument index e34c8d500..2eff86d7b 100644 --- a/data/templates/default.opendocument +++ b/data/templates/default.opendocument @@ -31,7 +31,7 @@ $include-before$ $endfor$ $if(toc)$ <text:table-of-content> - <text:table-of-content-source text:outline-level="10"> + <text:table-of-content-source text:outline-level="$toc-depth$"> <text:index-title-template text:style-name="Contents_20_Heading">$toc-title$</text:index-title-template> <text:table-of-content-entry-template text:outline-level="1" text:style-name="Contents_20_1"> diff --git a/src/Text/Pandoc/Writers/OpenDocument.hs b/src/Text/Pandoc/Writers/OpenDocument.hs index bd20d2db6..731f98e75 100644 --- a/src/Text/Pandoc/Writers/OpenDocument.hs +++ b/src/Text/Pandoc/Writers/OpenDocument.hs @@ -247,6 +247,7 @@ writeOpenDocument opts (Pandoc meta blocks) = do let automaticStyles = vcat $ reverse $ styles ++ listStyles let context = defField "body" body . defField "toc" (writerTableOfContents opts) + . defField "toc-depth" (tshow $ writerTOCDepth opts) . defField "automatic-styles" automaticStyles $ metadata return $ render colwidth $ |