Fix misleading code comment.
commit5c8e12b64bc51542a208b11fb15fa1916bba5a42
authorJohn MacFarlane <jgm@berkeley.edu>
dateFri 8 Feb 2019, 22:34 (8 years ago)
parent62c5d17
src/Text/Pandoc/Shared.hs+1−2
@@ -416,8 +416,7 @@ capitalize = walk go
416416 go x = x
417417
418418-- | Change final list item from @Para@ to @Plain@ if the list contains
419−-- no other @Para@ blocks. Like compactify, but operates on @Blocks@ rather
420−-- than @[Block]@.
419+-- no other @Para@ blocks.
421420compactify :: [Blocks] -- ^ List of list items (each a list of blocks)
422421 -> [Blocks]
423422compactify [] = []