diff options
| author | claremacrae <github@cfmacrae.fastmail.co.uk> | 2013-08-19 20:45:31 +0100 |
|---|---|---|
| committer | claremacrae <github@cfmacrae.fastmail.co.uk> | 2013-08-19 20:45:31 +0100 |
| commit | 6cc284cc8eadf6a1d9099b7f1e2b68b3d1ac4561 (patch) | |
| tree | 34039f80d91cbc1ce5e83d6ca56abb38365d6ae7 /src/Text/Pandoc | |
| parent | 883f119c871a9fce402ceace8492a3cef06c5e81 (diff) | |
| download | pandoc-6cc284cc8eadf6a1d9099b7f1e2b68b3d1ac4561.tar.gz | |
Bullet and ordered lists now always simple in dokuwiki writer (#386)
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Writers/DokuWiki.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Writers/DokuWiki.hs b/src/Text/Pandoc/Writers/DokuWiki.hs index 523c4d180..0f62e98c3 100644 --- a/src/Text/Pandoc/Writers/DokuWiki.hs +++ b/src/Text/Pandoc/Writers/DokuWiki.hs @@ -275,9 +275,8 @@ definitionListItemToDokuWiki opts (label, items) = do isSimpleList :: Block -> Bool isSimpleList x = case x of - BulletList items -> all isSimpleListItem items - OrderedList (num, sty, _) items -> all isSimpleListItem items && - num == 1 && sty `elem` [DefaultStyle, Decimal] + BulletList items -> True + OrderedList (num, sty, _) items -> True DefinitionList items -> all isSimpleListItem $ concatMap snd items _ -> False |