Better comment on removeFormatting.
commitea1bb4ed272a92b2458ccbf72439b1fd7e52cf0a
authorJohn MacFarlane <jgm@berkeley.edu>
dateSun 13 Jul 2014, 15:10 (12 years ago)
parent5dba2e2
src/Text/Pandoc/Shared.hs+1−1
@@ -494,7 +494,7 @@ normalizeInlines (Cite cs ils : ys) =
494494normalizeInlines (x : xs) = x : normalizeInlines xs
495495normalizeInlines [] = []
496496
497−-- | Remove inline formatting from a list of inlines.
497+-- | Extract inlines, removing formatting.
498498removeFormatting :: Walkable Inline a => a -> [Inline]
499499removeFormatting = query go . walk deNote
500500 where go :: Inline -> [Inline]