Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Removed some commented-out source.

Browse source
This commit is contained in:
John MacFarlane 2016-11-27 15:46:04 +01:00
parent 300d94ac24
commit 8978689c08
1 changed files with 0 additions and 70 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

70
src/Text/Pandoc.hs
View file

@ -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)