fb6e798 · typeable/pandoc

git.iko.soy/typeable/pandoc

Set writerTableOfContents for s5 in Text.Pandoc, not pandoc.hs.

commitfb6e7989170ac73e75f6ecdf79b8aaca5d353c76 authorJohn MacFarlane <fiddlosopher@gmail.com> dateMon 23 Jul 2012, 22:58 (14 years ago) parent1bd0c47

2 files changed+3−3

unifiedsplit

src/Text/Pandoc.hs+2−1

@@ -192,7 +192,8 @@ writers = [("native" , writeNative)

192192 writeHtmlString o{ writerLiterateHaskell = True,

193193 writerHtml5 = True })

194194 ,("s5" , \o ->

195− writeHtmlString o{ writerSlideVariant = S5Slides })

195+ writeHtmlString o{ writerSlideVariant = S5Slides

196+ , writerTableOfContents = False })

196197 ,("slidy" , \o ->

197198 writeHtmlString o{ writerSlideVariant = SlidySlides })

198199 ,("slideous" , \o ->

src/pandoc.hs+1−2

@@ -952,8 +952,7 @@ main = do

952952 writerVariables = variables'',

953953 writerEPUBMetadata = epubMetadata,

954954 writerTabStop = tabStop,

955− writerTableOfContents = toc &&

956− writerName' /= "s5",

955+ writerTableOfContents = toc,

957956 writerHTMLMathMethod = mathMethod,

958957 writerIncremental = incremental,

959958 writerCiteMethod = citeMethod,