diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2016-11-27 15:46:04 +0100 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2017-01-25 17:07:40 +0100 |
| commit | 8978689c0841d3c7cf47fc0de0ebb50a901f779d (patch) | |
| tree | 5c47457d846fbe0efe3682f051fb6d22ff3698af | |
| parent | 300d94ac249e7e70fb92fb21f6426d894fce61ce (diff) | |
Removed some commented-out source.
| -rw-r--r-- | src/Text/Pandoc.hs | 70 |
1 files changed, 0 insertions, 70 deletions
diff --git a/src/Text/Pandoc.hs b/src/Text/Pandoc.hs index b5e5bebcd..106c8b6bb 100644 --- a/src/Text/Pandoc.hs +++ b/src/Text/Pandoc.hs @@ -265,76 +265,6 @@ readers = [ ("native" , StringReader $ \_ s -> return $ readNative s) ,("epub" , mkBSReader readEPUB) ] --- data Writer = PureStringWriter (WriterOptions -> Pandoc -> String) --- | IOStringWriter (WriterOptions -> Pandoc -> IO String) --- | IOByteStringWriter (WriterOptions -> Pandoc -> IO BL.ByteString) - --- -- | Association list of formats and writers. --- writers :: [ ( String, Writer ) ] --- writers = [ --- ("native" , PureStringWriter writeNative) --- ,("json" , PureStringWriter writeJSON) --- ,("docx" , IOByteStringWriter $ \o doc -> --- runIOorExplode $ writeDocx o doc) --- ,("odt" , IOByteStringWriter $ \o doc -> --- runIOorExplode $ writeODT o doc) --- ,("epub" , IOByteStringWriter $ \o doc -> --- runIOorExplode $ --- writeEPUB o{ writerEpubVersion = Just EPUB2 } doc) --- ,("epub3" , IOByteStringWriter $ \o doc -> --- runIOorExplode $ --- writeEPUB o{ writerEpubVersion = Just EPUB3 } doc) --- ,("fb2" , IOStringWriter $ \o doc -> --- runIOorExplode $ writeFB2 o doc) --- ,("html" , PureStringWriter writeHtmlString) --- ,("html5" , PureStringWriter $ \o -> --- writeHtmlString o{ writerHtml5 = True }) --- ,("icml" , IOStringWriter $ \o doc -> --- runIOorExplode $ writeICML o doc) --- ,("s5" , PureStringWriter $ \o -> --- writeHtmlString o{ writerSlideVariant = S5Slides --- , writerTableOfContents = False }) --- ,("slidy" , PureStringWriter $ \o -> --- writeHtmlString o{ writerSlideVariant = SlidySlides }) --- ,("slideous" , PureStringWriter $ \o -> --- writeHtmlString o{ writerSlideVariant = SlideousSlides }) --- ,("dzslides" , PureStringWriter $ \o -> --- writeHtmlString o{ writerSlideVariant = DZSlides --- , writerHtml5 = True }) --- ,("revealjs" , PureStringWriter $ \o -> --- writeHtmlString o{ writerSlideVariant = RevealJsSlides --- , writerHtml5 = True }) --- ,("docbook" , PureStringWriter writeDocbook) --- ,("docbook5" , PureStringWriter $ \o -> --- writeDocbook o{ writerDocbook5 = True }) --- ,("opml" , PureStringWriter writeOPML) --- ,("opendocument" , PureStringWriter writeOpenDocument) --- ,("latex" , PureStringWriter writeLaTeX) --- ,("beamer" , PureStringWriter $ \o -> --- writeLaTeX o{ writerBeamer = True }) --- ,("context" , PureStringWriter writeConTeXt) --- ,("texinfo" , PureStringWriter writeTexinfo) --- ,("man" , PureStringWriter writeMan) --- ,("markdown" , PureStringWriter writeMarkdown) --- ,("markdown_strict" , PureStringWriter writeMarkdown) --- ,("markdown_phpextra" , PureStringWriter writeMarkdown) --- ,("markdown_github" , PureStringWriter writeMarkdown) --- ,("markdown_mmd" , PureStringWriter writeMarkdown) --- ,("plain" , PureStringWriter writePlain) --- ,("rst" , PureStringWriter writeRST) --- ,("mediawiki" , PureStringWriter writeMediaWiki) --- ,("dokuwiki" , PureStringWriter writeDokuWiki) --- ,("zimwiki" , PureStringWriter writeZimWiki) --- ,("textile" , PureStringWriter writeTextile) --- ,("rtf" , IOStringWriter $ \o doc -> --- runIOorExplode $ writeRTFWithEmbeddedImages o doc) --- ,("org" , PureStringWriter writeOrg) --- ,("asciidoc" , PureStringWriter writeAsciiDoc) --- ,("haddock" , PureStringWriter writeHaddock) --- ,("commonmark" , PureStringWriter writeCommonMark) --- ,("tei" , PureStringWriter writeTEI) --- ] - data Writer m = StringWriter (WriterOptions -> Pandoc -> m String) | ByteStringWriter (WriterOptions -> Pandoc -> m BL.ByteString) |