diff options
| -rw-r--r-- | Text/Pandoc/Readers/Markdown.hs | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/Text/Pandoc/Readers/Markdown.hs b/Text/Pandoc/Readers/Markdown.hs index f6d2f9805..d49dd8e04 100644 --- a/Text/Pandoc/Readers/Markdown.hs +++ b/Text/Pandoc/Readers/Markdown.hs @@ -380,8 +380,6 @@ keyValAttr = try $ do codeBlockDelimited :: GenParser Char st Block codeBlockDelimited = try $ do (size, attr) <- codeBlockDelimiter Nothing - optional blankline -- this helps make literate haskell possible; it requires - -- a blank line between comment and code contents <- manyTill anyLine (codeBlockDelimiter (Just size)) blanklines return $ CodeBlock attr $ intercalate "\n" contents |