From 8d3bec3e4d8cbd5c623e7d83f271a361e761d16a Mon Sep 17 00:00:00 2001 From: fiddlosopher Date: Sat, 1 Sep 2007 02:10:30 +0000 Subject: Removed unnecessary 'try' in 'codeBlock'. git-svn-id: https://pandoc.googlecode.com/svn/trunk@977 788f1e2b-df1e-0410-8736-df70ead52e1b --- src/Text/Pandoc/Readers/Markdown.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index 0306ed7c5..a0d6e9968 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -266,7 +266,7 @@ hrule = try $ do indentedLine = indentSpaces >> manyTill anyChar newline >>= return . (++ "\n") -codeBlock = try $ do +codeBlock = do contents <- many1 (indentedLine <|> try (do b <- blanklines l <- indentedLine -- cgit v1.2.3