aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorClare Macrae <github@cfmacrae.fastmail.co.uk>2014-07-02 22:40:34 +0100
committerClare Macrae <github@cfmacrae.fastmail.co.uk>2014-07-02 22:40:34 +0100
commit0c6f06b8a493bf9bc578a0b882939bac130e16f0 (patch)
tree9807b396998e27ae9bce4760b3b57eee5356cc7b /src/Text/Pandoc
parent7647d87657b324b268e7d1bf1b6fe9056312d55e (diff)
downloadpandoc-0c6f06b8a493bf9bc578a0b882939bac130e16f0.tar.gz
DokuWiki writer: Span no longer swallows text
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Writers/DokuWiki.hs8
1 files changed, 2 insertions, 6 deletions
diff --git a/src/Text/Pandoc/Writers/DokuWiki.hs b/src/Text/Pandoc/Writers/DokuWiki.hs
index 76a0463eb..ea56ac393 100644
--- a/src/Text/Pandoc/Writers/DokuWiki.hs
+++ b/src/Text/Pandoc/Writers/DokuWiki.hs
@@ -31,7 +31,6 @@ DokuWiki: <https://www.dokuwiki.org/dokuwiki>
-}
{-
- [ ] Correct handling of Span
[ ] Implement nested blockquotes (currently only ever does one level)
[ ] Implement alignment of text in tables
[ ] Implement comments
@@ -348,12 +347,9 @@ inlineListToDokuWiki opts lst = mapM (inlineToDokuWiki opts) lst >>= return . co
-- | Convert Pandoc inline element to DokuWiki.
inlineToDokuWiki :: WriterOptions -> Inline -> State WriterState String
-inlineToDokuWiki _opts (Span _attrs _ils) = do
- return ""
- {-
+inlineToDokuWiki opts (Span _attrs ils) = do
contents <- inlineListToDokuWiki opts ils
- return $ render Nothing (tagWithAttrs "span" attrs) ++ contents ++ "</span>"
- -}
+ return contents
inlineToDokuWiki opts (Emph lst) = do
contents <- inlineListToDokuWiki opts lst