aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2015-04-12 21:49:08 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2015-04-12 22:06:44 -0700
commit0439f6f964036de9b3c937f1cca80f825d0cc0fe (patch)
tree6394de65ffe36ad7e26be790f2f4d27c7c98b725
parentfee04fbee08c7deab6c88853540d728f7e613102 (diff)
downloadpandoc-0439f6f964036de9b3c937f1cca80f825d0cc0fe.tar.gz
Fixed toc depth in RST writer.
Previously the depth was being rendered as a floating point number with a decimal point. Thanks to Nick Yakimov for noticing this.
-rw-r--r--src/Text/Pandoc/Writers/RST.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/RST.hs b/src/Text/Pandoc/Writers/RST.hs
index 7d1e22baa..2f4c9575e 100644
--- a/src/Text/Pandoc/Writers/RST.hs
+++ b/src/Text/Pandoc/Writers/RST.hs
@@ -89,7 +89,7 @@ pandocToRST (Pandoc meta blocks) = do
let main = render colwidth $ foldl ($+$) empty $ [body, notes, refs, pics]
let context = defField "body" main
$ defField "toc" (writerTableOfContents opts)
- $ defField "toc-depth" (writerTOCDepth opts)
+ $ defField "toc-depth" (show $ writerTOCDepth opts)
$ defField "math" hasMath
$ defField "title" (render Nothing title :: String)
$ defField "math" hasMath