@@ -351,7 +351,7 @@ tableItemToDokuWiki :: WriterOptions
351 -> [Block]
351 -> [Block]
352 -> State WriterState String
352 -> State WriterState String
353-- TODO Fix celltype and align' defined but not used
353-- TODO Fix celltype and align' defined but not used
354−tableItemToDokuWiki opts celltype align' item = do
354+tableItemToDokuWiki opts _celltype _align' item = do
355 let mkcell x = "" ++ x ++ ""
355 let mkcell x = "" ++ x ++ ""
356 contents <- blockListToDokuWiki opts item
356 contents <- blockListToDokuWiki opts item
357 return $ mkcell contents
357 return $ mkcell contents
@@ -378,7 +378,7 @@ inlineListToDokuWiki opts lst = mapM (inlineToDokuWiki opts) lst >>= return . co
378-- | Convert Pandoc inline element to DokuWiki.
378-- | Convert Pandoc inline element to DokuWiki.
379inlineToDokuWiki :: WriterOptions -> Inline -> State WriterState String
379inlineToDokuWiki :: WriterOptions -> Inline -> State WriterState String
381−inlineToDokuWiki opts (Span attrs ils) = do
381+inlineToDokuWiki _opts (Span _attrs _ils) = do
382 return ""
382 return ""
384 contents <- inlineListToDokuWiki opts ils
384 contents <- inlineListToDokuWiki opts ils