diff options
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index 461910b0e..95bcc5d5a 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -466,7 +466,7 @@ htmlBlock = do -- True if tag is self-closing isSelfClosing tag = - isSuffixOf "/>" $ filter (\c -> (not (c `elem` " \n\t"))) tag + isSuffixOf "/>" $ filter (not . (`elem` " \n\t")) tag strictHtmlBlock = try $ do tag <- anyHtmlBlockTag |