Removed unnecessary 'try' in 'codeBlock'.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@977 788f1e2b-df1e-0410-8736-df70ead52e1b
2007-09-01 02:10:30 +00:00 · 2007-09-01 02:10:30 +00:00 · 8d3bec3e4d
commit 8d3bec3e4d
parent bdf78fe33f
1 changed files with 1 additions and 1 deletions
--- 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