diff options
| author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-08-29 20:03:28 +0000 |
|---|---|---|
| committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-08-29 20:03:28 +0000 |
| commit | 015644b60e66b9075c924358a4a7f8ff30d21e40 (patch) | |
| tree | 328cb5ba3ad6331dfb3f820b3dc4c0995e4556ee | |
| parent | 7f8ec9577e3b2d821d67f87ad8070315474aa359 (diff) | |
| download | pandoc-015644b60e66b9075c924358a4a7f8ff30d21e40.tar.gz | |
Purely stylistic change.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@957 788f1e2b-df1e-0410-8736-df70ead52e1b
| -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 |