diff options
| author | claremacrae <github@cfmacrae.fastmail.co.uk> | 2013-08-19 21:28:17 +0100 |
|---|---|---|
| committer | claremacrae <github@cfmacrae.fastmail.co.uk> | 2013-08-19 21:28:17 +0100 |
| commit | ebcd90b24ad86e734b78dba8c4f544ec4ae5782b (patch) | |
| tree | da49959f08eed9bbd8573432ecd239a0e96e28bd /src/Text/Pandoc | |
| parent | 6cc284cc8eadf6a1d9099b7f1e2b68b3d1ac4561 (diff) | |
| download | pandoc-ebcd90b24ad86e734b78dba8c4f544ec4ae5782b.tar.gz | |
Fix some warnings in dokuwiki writer (#386)
Diffstat (limited to 'src/Text/Pandoc')
| -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 |