Add param to tocToList for numberSections.

Otherwise sections are always numbered in the TOC,
even if `--number-sections` is not used.

1 files changed, 4 insertions, 2 deletions

diff --git a/pandoc-lua-engine/src/Text/Pandoc/Lua/Module/Structure.hs b/pandoc-lua-engine/src/Text/Pandoc/Lua/Module/Structure.hs
index 56977edae..21248c724 100644
--- a/pandoc-lua-engine/src/Text/Pandoc/Lua/Module/Structure.hs
+++ b/pandoc-lua-engine/src/Text/Pandoc/Lua/Module/Structure.hs
@@ -29,7 +29,8 @@ import Text.Pandoc.Lua.Marshal.AST ( peekBlocksFuzzy, peekPandoc
                                    , pushBlock, pushBlocks )
 import Text.Pandoc.Lua.Marshal.Chunks
 import Text.Pandoc.Lua.Marshal.WriterOptions ( peekWriterOptions )
-import Text.Pandoc.Options (WriterOptions (writerTOCDepth))
+import Text.Pandoc.Options (WriterOptions (writerTOCDepth,
+                                           writerNumberSections))
 import Text.Pandoc.Slides (getSlideLevel, prepSlides)
 import Text.Pandoc.Writers.Shared (toTableOfContents)
 import qualified Data.Text as T
@@ -168,7 +169,8 @@ table_of_contents = defun "table_of_contents"
           let writerOpts = fromMaybe def mwriterOpts
           in case tocSource of
                Left blks  -> toTableOfContents writerOpts blks
-               Right tree -> tocToList (writerTOCDepth writerOpts) tree
+               Right tree -> tocToList (writerNumberSections writerOpts)
+                                       (writerTOCDepth writerOpts) tree
       )
   <#> parameter peekTocSource "Blocks|Pandoc|ChunkedDoc" "toc_source"
         "list of command line arguments"