diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2014-07-13 15:48:01 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2014-07-13 15:48:01 -0700 |
| commit | 0ba2f0b8f9002a53351716991509fc7621fa8272 (patch) | |
| tree | 9b2c03dac03ea43435df90d96d1ec57cccb78ddb /src/Text/Pandoc | |
| parent | 15956fcac75febaed7bf159abcee24c02fb1a8c1 (diff) | |
| download | pandoc-0ba2f0b8f9002a53351716991509fc7621fa8272.tar.gz | |
DokuWiki writer: Normalize to collapse adjacent raw HTML blocks.
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Writers/DokuWiki.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/DokuWiki.hs b/src/Text/Pandoc/Writers/DokuWiki.hs index 929715bd9..c7b723a21 100644 --- a/src/Text/Pandoc/Writers/DokuWiki.hs +++ b/src/Text/Pandoc/Writers/DokuWiki.hs @@ -57,7 +57,7 @@ data WriterState = WriterState { -- | Convert Pandoc to DokuWiki. writeDokuWiki :: WriterOptions -> Pandoc -> String writeDokuWiki opts document = - evalState (pandocToDokuWiki opts document) + evalState (pandocToDokuWiki opts $ normalize document) (WriterState { stNotes = False, stIndent = "", stUseTags = False }) -- | Return DokuWiki representation of document. |