diff options
| author | Mauro Bieg <mb21@users.noreply.github.com> | 2016-12-24 15:34:07 +0100 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2016-12-24 07:34:07 -0700 |
| commit | 0159956f7fc008ecc28632920e700878aa3f5996 (patch) | |
| tree | 6726fb44ca5374c0fbf8e13c572a2224e3afc3f4 /src/Text/Pandoc | |
| parent | b87276576541b3117ca7360bf2a04227802cf837 (diff) | |
| download | pandoc-0159956f7fc008ecc28632920e700878aa3f5996.tar.gz | |
markdown reader: disallow space between inline code and attributes (#3326)
closes #3323
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index 20a478aa9..41c967cb6 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -1561,8 +1561,8 @@ code = try $ do (char '\n' >> notFollowedBy' blankline >> return " ")) (try (skipSpaces >> count (length starts) (char '`') >> notFollowedBy (char '`'))) - attr <- option ([],[],[]) (try $ guardEnabled Ext_inline_code_attributes >> - optional whitespace >> attributes) + attr <- option ([],[],[]) (try $ guardEnabled Ext_inline_code_attributes + >> attributes) return $ return $ B.codeWith attr $ trim $ concat result math :: MarkdownParser (F Inlines) |