diff options
| author | Matthew Pickering <matthewtpickering@gmail.com> | 2014-07-30 00:57:20 +0100 |
|---|---|---|
| committer | Matthew Pickering <matthewtpickering@gmail.com> | 2014-07-31 21:39:50 +0100 |
| commit | 8460ea417f3bcd4599f1ba4877dd4c6e2a373ed1 (patch) | |
| tree | 19c8d40ec10efbf9ea1056ecaabab7e094ede2c0 /src/Text | |
| parent | 51051e9953f97c35178eded5d3959394a184baf4 (diff) | |
| download | pandoc-8460ea417f3bcd4599f1ba4877dd4c6e2a373ed1.tar.gz | |
EPUB Reader: Integrated into program
Diffstat (limited to 'src/Text')
| -rw-r--r-- | src/Text/Pandoc.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Text/Pandoc.hs b/src/Text/Pandoc.hs index 77eb3e82f..589a6af98 100644 --- a/src/Text/Pandoc.hs +++ b/src/Text/Pandoc.hs @@ -79,6 +79,7 @@ module Text.Pandoc , readJSON , readTxt2Tags , readTxt2TagsNoMacros + , readEPUB -- * Writers: converting /from/ Pandoc format , Writer (..) , writeNative @@ -134,6 +135,7 @@ import Text.Pandoc.Readers.Native import Text.Pandoc.Readers.Haddock import Text.Pandoc.Readers.Docx import Text.Pandoc.Readers.Txt2Tags +import Text.Pandoc.Readers.EPUB import Text.Pandoc.Writers.Native import Text.Pandoc.Writers.Markdown import Text.Pandoc.Writers.RST @@ -233,6 +235,7 @@ readers = [ ("native" , StringReader $ \_ s -> return $ readNative s) ,("haddock" , mkStringReader readHaddock) ,("docx" , mkBSReader readDocx) ,("t2t" , mkStringReader readTxt2TagsNoMacros) + ,("epub" , mkBSReader readEPUB) ] data Writer = PureStringWriter (WriterOptions -> Pandoc -> String) |