summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2017-01-27 22:39:36 +0100
committerJohn MacFarlane <jgm@berkeley.edu>2017-01-27 22:39:36 +0100
commit91cdcc796df3db290d1930b159eb3ee2f74d4c03 (patch)
treea3fda08ed084bdcd4d5752a14f79dffd23c3b16c /src/Text/Pandoc.hs
parent5156a4fe3c2438eeb0caa4a85e8adfdbea94e59d (diff)
HTML: export separate functions for slide formats.
writeS5, writeSlideous, writeRevealJs, writeDZSlides, writeSlidy. Removed writerSlideVariant from WriterOptions.
Diffstat (limited to 'src/Text/Pandoc.hs')
-rw-r--r--src/Text/Pandoc.hs21
1 files changed, 10 insertions, 11 deletions
diff --git a/src/Text/Pandoc.hs b/src/Text/Pandoc.hs
index ea625ffa1..4d0dde96c 100644
--- a/src/Text/Pandoc.hs
+++ b/src/Text/Pandoc.hs
@@ -103,6 +103,11 @@ module Text.Pandoc
, writeHtml4String
, writeHtml5
, writeHtml5String
+ , writeRevealJs
+ , writeS5
+ , writeSlidy
+ , writeSlideous
+ , writeDZSlides
, writeICML
, writeDocbook4
, writeDocbook5
@@ -288,17 +293,11 @@ writers = [
,("html4" , StringWriter writeHtml4String)
,("html5" , StringWriter writeHtml5String)
,("icml" , StringWriter writeICML)
- ,("s5" , StringWriter $ \o ->
- writeHtml4String o{ writerSlideVariant = S5Slides
- , writerTableOfContents = False })
- ,("slidy" , StringWriter $ \o ->
- writeHtml4String o{ writerSlideVariant = SlidySlides })
- ,("slideous" , StringWriter $ \o ->
- writeHtml4String o{ writerSlideVariant = SlideousSlides })
- ,("dzslides" , StringWriter $ \o ->
- writeHtml5String o{ writerSlideVariant = DZSlides })
- ,("revealjs" , StringWriter $ \o ->
- writeHtml5String o{ writerSlideVariant = RevealJsSlides })
+ ,("s5" , StringWriter writeS5)
+ ,("slidy" , StringWriter writeSlidy)
+ ,("slideous" , StringWriter writeSlideous)
+ ,("dzslides" , StringWriter writeDZSlides)
+ ,("revealjs" , StringWriter writeRevealJs)
,("docbook" , StringWriter writeDocbook5)
,("docbook4" , StringWriter writeDocbook4)
,("docbook5" , StringWriter writeDocbook5)