From ebcd90b24ad86e734b78dba8c4f544ec4ae5782b Mon Sep 17 00:00:00 2001
From: claremacrae <github@cfmacrae.fastmail.co.uk>
Date: Mon, 19 Aug 2013 21:28:17 +0100
Subject: Fix some warnings in dokuwiki writer (#386)

---
 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 0f62e98c3..321e8f428 100644
--- a/src/Text/Pandoc/Writers/DokuWiki.hs
+++ b/src/Text/Pandoc/Writers/DokuWiki.hs
@@ -275,8 +275,8 @@ definitionListItemToDokuWiki opts (label, items) = do
 isSimpleList :: Block -> Bool
 isSimpleList x =
   case x of
-       BulletList items                 -> True
-       OrderedList (num, sty, _) items  -> True
+       BulletList _                     -> True
+       OrderedList _ _                  -> True
        DefinitionList items             -> all isSimpleListItem $ concatMap snd items
        _                                -> False
 
-- 
cgit v1.2.3