Shared: Generalized type of removeFormatting.
commit5dba2e21925fe0ca7c0a252c54d6fe79fa061ff5
authorJohn MacFarlane <jgm@berkeley.edu>
dateSun 13 Jul 2014, 14:56 (12 years ago)
parent5df812f
src/Text/Pandoc/Shared.hs+1−1
@@ -495,7 +495,7 @@ normalizeInlines (x : xs) = x : normalizeInlines xs
495495normalizeInlines [] = []
496496
497497-- | Remove inline formatting from a list of inlines.
498−removeFormatting :: [Inline] -> [Inline]
498+removeFormatting :: Walkable Inline a => a -> [Inline]
499499removeFormatting = query go . walk deNote
500500 where go :: Inline -> [Inline]
501501 go (Str xs) = [Str xs]