diff options
-rw-r--r-- | src/Text/Pandoc.hs | 3 | ||||
-rw-r--r-- | src/pandoc.hs | 3 |
2 files changed, 3 insertions, 3 deletions
diff --git a/src/Text/Pandoc.hs b/src/Text/Pandoc.hs index b27651049..a813996c0 100644 --- a/src/Text/Pandoc.hs +++ b/src/Text/Pandoc.hs @@ -192,7 +192,8 @@ writers = [("native" , writeNative) writeHtmlString o{ writerLiterateHaskell = True, writerHtml5 = True }) ,("s5" , \o -> - writeHtmlString o{ writerSlideVariant = S5Slides }) + writeHtmlString o{ writerSlideVariant = S5Slides + , writerTableOfContents = False }) ,("slidy" , \o -> writeHtmlString o{ writerSlideVariant = SlidySlides }) ,("slideous" , \o -> diff --git a/src/pandoc.hs b/src/pandoc.hs index 631ed9d91..5cebab28f 100644 --- a/src/pandoc.hs +++ b/src/pandoc.hs @@ -952,8 +952,7 @@ main = do writerVariables = variables'', writerEPUBMetadata = epubMetadata, writerTabStop = tabStop, - writerTableOfContents = toc && - writerName' /= "s5", + writerTableOfContents = toc, writerHTMLMathMethod = mathMethod, writerIncremental = incremental, writerCiteMethod = citeMethod, |