diff options
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Writers/DokuWiki.hs | 8 |
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 |