Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Revert "Markdown reader: Ignore blank line after ~~~~~~~~ in delimited code blocks."

Browse source 
This reverts commit 7ad17fe5cf.
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
This commit is contained in:
fiddlosopher 2008-11-02 16:44:26 +00:00
parent 412315b530
commit c02e0f76fe
1 changed files with 0 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Text/Pandoc/Readers/Markdown.hs
View file

@ -380,8 +380,6 @@ keyValAttr = try $ do
codeBlockDelimited :: GenParser Char st Block codeBlockDelimited :: GenParser Char st Block
codeBlockDelimited = try $ do codeBlockDelimited = try $ do
(size, attr) <- codeBlockDelimiter Nothing (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)) contents <- manyTill anyLine (codeBlockDelimiter (Just size))
blanklines blanklines
return $ CodeBlock attr $ intercalate "\n" contents return $ CodeBlock attr $ intercalate "\n" contents