git.iko.soy/typeable/pandoc
on master help sign in
Avoid compiler warning for unused identifier.
a21833bJohn MacFarlane
src/Text/Pandoc/Writers/Textile.hs+1−1
compare with master
unifiedsplit
@@ -287,7 +287,7 @@ isSimpleList :: Block -> Bool
287isSimpleList x =
287isSimpleList x =
288 case x of
288 case x of
289 BulletList items -> all isSimpleListItem items
289 BulletList items -> all isSimpleListItem items
290− OrderedList (num, sty, _) items -> all isSimpleListItem items &&
290+ OrderedList (_, sty, _) items -> all isSimpleListItem items &&
291 sty `elem` [DefaultStyle, Decimal]
291 sty `elem` [DefaultStyle, Decimal]
292 _ -> False
292 _ -> False
293
293