git.iko.soy/typeable/pandoc
on master help sign in
Fix misleading code comment.
5c8e12bJohn MacFarlane
src/Text/Pandoc/Shared.hs+1−2
@@ -416,8 +416,7 @@ capitalize = walk go
416 go x = x
416 go x = x
417
417
418-- | Change final list item from @Para@ to @Plain@ if the list contains
418-- | Change final list item from @Para@ to @Plain@ if the list contains
419−-- no other @Para@ blocks. Like compactify, but operates on @Blocks@ rather
419+-- no other @Para@ blocks.
420−-- than @[Block]@.
421compactify :: [Blocks] -- ^ List of list items (each a list of blocks)
420compactify :: [Blocks] -- ^ List of list items (each a list of blocks)
422 -> [Blocks]
421 -> [Blocks]
423compactify [] = []
422compactify [] = []