summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/Markdown.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2014-03-24 09:56:16 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2014-03-24 09:56:16 -0700
commitdd058b38b0e7ed511353338c4830aab156c39a0e (patch)
tree197305ab26a3a34a6768f002d13c3113df3d49d7 /src/Text/Pandoc/Readers/Markdown.hs
parent818894b7b53af31cd196fa4f418d7b7468f1ff3b (diff)
Markdown reader: Fixed regression on line breaks in strict mode.
Closes #1203.
Diffstat (limited to 'src/Text/Pandoc/Readers/Markdown.hs')
-rw-r--r--src/Text/Pandoc/Readers/Markdown.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs
index 0ea7f9ac5..aa0252266 100644
--- a/src/Text/Pandoc/Readers/Markdown.hs
+++ b/src/Text/Pandoc/Readers/Markdown.hs
@@ -1558,7 +1558,7 @@ endline = try $ do
guardDisabled Ext_lists_without_preceding_blankline <|> notFollowedBy listStart
guardEnabled Ext_blank_before_blockquote <|> notFollowedBy emailBlockQuoteStart
guardEnabled Ext_blank_before_header <|> notFollowedBy (char '#') -- atx header
- guardEnabled Ext_backtick_code_blocks >>
+ guardDisabled Ext_backtick_code_blocks <|>
notFollowedBy (() <$ (lookAhead (char '`') >> codeBlockFenced))
(guardEnabled Ext_hard_line_breaks >> return (return B.linebreak))
<|> (guardEnabled Ext_ignore_line_breaks >> return mempty)