diff options
Diffstat (limited to 'src/pandoc.hs')
| -rw-r--r-- | src/pandoc.hs | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/src/pandoc.hs b/src/pandoc.hs index 00df92e2c..8d02f4c55 100644 --- a/src/pandoc.hs +++ b/src/pandoc.hs @@ -102,7 +102,7 @@ readPandoc _ = read -- | Association list of formats and writers. writers :: [ ( String, WriterOptions -> Pandoc -> String ) ] -writers = [("native" , writeDoc) +writers = [("native" , writeNative) ,("html" , writeHtmlString) ,("html+lhs" , writeHtmlString) ,("s5" , writeS5String) @@ -127,10 +127,6 @@ writers = [("native" , writeDoc) isNonTextOutput :: String -> Bool isNonTextOutput = (`elem` ["odt","epub"]) --- | Writer for Pandoc native format. -writeDoc :: WriterOptions -> Pandoc -> String -writeDoc _ = prettyPandoc - headerShift :: Int -> Pandoc -> Pandoc headerShift n = processWith shift where shift :: Block -> Block |