diff options
| -rw-r--r-- | src/Text/Pandoc/Writers/DokuWiki.hs | 4 |
1 files changed, 2 insertions, 2 deletions
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 |