aboutsummaryrefslogtreecommitdiff
path: root/FormatOpts.hs
diff options
context:
space:
mode:
authorMirek Kratochvil <exa.exa@gmail.com>2023-06-18 22:11:01 +0200
committerMirek Kratochvil <exa.exa@gmail.com>2023-06-18 22:11:01 +0200
commit6cd0b9f6631d14f66c4b994771dee60ef74b270c (patch)
tree68b144c0b2b13543dad8d40df1a62f9e06b6c0b1 /FormatOpts.hs
parent8fd47d38bb4c3dead49600f93f5345c0b06a6fec (diff)
downloadreploy-6cd0b9f6631d14f66c4b994771dee60ef74b270c.tar.gz
reploy-6cd0b9f6631d14f66c4b994771dee60ef74b270c.tar.bz2
configurable tocs
Diffstat (limited to 'FormatOpts.hs')
-rw-r--r--FormatOpts.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/FormatOpts.hs b/FormatOpts.hs
index 40d02e8..4759f89 100644
--- a/FormatOpts.hs
+++ b/FormatOpts.hs
@@ -25,3 +25,7 @@ htmlWriteOpts =
-- | Default plaintext writing options for Pandoc.
plainWriteOpts :: WriterOptions
plainWriteOpts = def {writerWrapText = WrapNone}
+
+-- | Default options for making tables of contents with certain depth.
+tocWriteOpts :: Int -> WriterOptions
+tocWriteOpts n = def { writerTOCDepth = n}