diff options
| author | Clare Macrae <github@cfmacrae.fastmail.co.uk> | 2014-07-02 21:26:24 +0100 |
|---|---|---|
| committer | Clare Macrae <github@cfmacrae.fastmail.co.uk> | 2014-07-02 21:26:24 +0100 |
| commit | d234157d25e13cdb84e96404dfae610c1ad4b4d6 (patch) | |
| tree | 5208ed169abc273f94a3004071205c30d058e8f3 /src/Text/Pandoc/Writers | |
| parent | 92a962ba63fc8a956cf48a828f200bf10b72cc35 (diff) | |
| download | pandoc-d234157d25e13cdb84e96404dfae610c1ad4b4d6.tar.gz | |
DokuWiki output: Implement blockquotes properly
TODO Also implement nested blockquotes.
Diffstat (limited to 'src/Text/Pandoc/Writers')
| -rw-r--r-- | src/Text/Pandoc/Writers/DokuWiki.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/DokuWiki.hs b/src/Text/Pandoc/Writers/DokuWiki.hs index 663bcce2e..8ea1841eb 100644 --- a/src/Text/Pandoc/Writers/DokuWiki.hs +++ b/src/Text/Pandoc/Writers/DokuWiki.hs @@ -32,7 +32,7 @@ DokuWiki: <https://www.dokuwiki.org/dokuwiki> {- [ ] Correct handling of Span - [ ] Don't generate <blockquote>... + [ ] Implement nested blockquotes (currently only ever does one level) [ ] Don't generate lists using <ol> and <ul> [ ] Implement alignment of text in tables [ ] Implement comments @@ -150,7 +150,7 @@ blockToDokuWiki _ (CodeBlock (_,classes,_) str) = do blockToDokuWiki opts (BlockQuote blocks) = do contents <- blockListToDokuWiki opts blocks - return $ "<blockquote>" ++ contents ++ "</blockquote>" + return $ "> " ++ contents blockToDokuWiki opts (Table capt aligns _ headers rows') = do let alignStrings = map alignmentToString aligns |