summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Text/Pandoc.hs3
-rw-r--r--src/pandoc.hs3
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,