diff options
| -rw-r--r-- | src/Text/Pandoc/Shared.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Shared.hs b/src/Text/Pandoc/Shared.hs index 8504e996c..02391885d 100644 --- a/src/Text/Pandoc/Shared.hs +++ b/src/Text/Pandoc/Shared.hs @@ -495,7 +495,7 @@ normalizeInlines (x : xs) = x : normalizeInlines xs normalizeInlines [] = [] -- | Remove inline formatting from a list of inlines. -removeFormatting :: [Inline] -> [Inline] +removeFormatting :: Walkable Inline a => a -> [Inline] removeFormatting = query go . walk deNote where go :: Inline -> [Inline] go (Str xs) = [Str xs] |