@@ -269,7 +269,7 @@ codeBlock = try $ do
269 try (do b <- blanklines
269 try (do b <- blanklines
270 l <- indentedLine
270 l <- indentedLine
271 return $ b ++ l))
271 return $ b ++ l))
272− blanklines
272+ optional blanklines
273 return $ CodeBlock $ stripTrailingNewlines $ concat contents
273 return $ CodeBlock $ stripTrailingNewlines $ concat contents