From a049a60129fe12b2b9132d36c9990dbbca3fd4c8 Mon Sep 17 00:00:00 2001
From: Clare Macrae <github@cfmacrae.fastmail.co.uk>
Date: Mon, 30 Jun 2014 22:07:17 +0100
Subject: Disable warnings about unused parameters.

---
 src/Text/Pandoc/Writers/DokuWiki.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/Text/Pandoc/Writers/DokuWiki.hs b/src/Text/Pandoc/Writers/DokuWiki.hs
index 1f2a4e33a..ce8efb281 100644
--- a/src/Text/Pandoc/Writers/DokuWiki.hs
+++ b/src/Text/Pandoc/Writers/DokuWiki.hs
@@ -351,7 +351,7 @@ tableItemToDokuWiki :: WriterOptions
                      -> [Block]
                      -> State WriterState String
 -- TODO Fix celltype and align' defined but not used
-tableItemToDokuWiki opts celltype align' item = do
+tableItemToDokuWiki opts _celltype _align' item = do
   let mkcell x = "" ++ x ++ ""
   contents <- blockListToDokuWiki opts item
   return $ mkcell contents
@@ -378,7 +378,7 @@ 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
+inlineToDokuWiki _opts (Span _attrs _ils) = do
   return ""
   {-
   contents <- inlineListToDokuWiki opts ils
-- 
cgit v1.2.3