From c02e0f76fe6ac4465322e1a6652315460fe3a1f9 Mon Sep 17 00:00:00 2001 From: fiddlosopher Date: Sun, 2 Nov 2008 16:44:26 +0000 Subject: Revert "Markdown reader: Ignore blank line after ~~~~~~~~ in delimited code blocks." This reverts commit 7ad17fe5cff04e0b68be5c4a08339bb53d3d176d. We will soon have a better way of handling literate haskell. git-svn-id: https://pandoc.googlecode.com/svn/trunk@1481 788f1e2b-df1e-0410-8736-df70ead52e1b --- Text/Pandoc/Readers/Markdown.hs | 2 -- 1 file changed, 2 deletions(-) (limited to 'Text/Pandoc/Readers') 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 -- cgit v1.2.3