diff options
Diffstat (limited to 'src/Text')
| -rw-r--r-- | src/Text/Pandoc.hs | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/src/Text/Pandoc.hs b/src/Text/Pandoc.hs index 0a2c613b1..b27651049 100644 --- a/src/Text/Pandoc.hs +++ b/src/Text/Pandoc.hs @@ -191,10 +191,15 @@ writers = [("native" , writeNative) ,("html5+lhs" , \o -> writeHtmlString o{ writerLiterateHaskell = True, writerHtml5 = True }) - ,("s5" , writeHtmlString) - ,("slidy" , writeHtmlString) - ,("slideous" , writeHtmlString) - ,("dzslides" , writeHtmlString) + ,("s5" , \o -> + writeHtmlString o{ writerSlideVariant = S5Slides }) + ,("slidy" , \o -> + writeHtmlString o{ writerSlideVariant = SlidySlides }) + ,("slideous" , \o -> + writeHtmlString o{ writerSlideVariant = SlideousSlides }) + ,("dzslides" , \o -> + writeHtmlString o{ writerSlideVariant = DZSlides + , writerHtml5 = True }) ,("docbook" , writeDocbook) ,("opendocument" , writeOpenDocument) ,("latex" , writeLaTeX) |