Added trys to two list start routines. Reason:
<|> only parses second parser when first hasn't consumed
input.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@576 788f1e2b-df1e-0410-8736-df70ead52e1b
commitcdf7c78b5f39ac30a3b1089bd8ce9349425bf5cd
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>
dateFri 16 Mar 2007, 06:05 (20 years ago)
parent0d2e5ea
src/Text/Pandoc/Readers/Markdown.hs+4−4
@@ -359,14 +359,14 @@ bulletListStart = try (do
359359 spaceChar
360360 skipSpaces)
361361
362−standardOrderedListStart = do
362+standardOrderedListStart = try (do
363363 many1 digit
364− char '.'
364+ char '.')
365365
366−extendedOrderedListStart = do
366+extendedOrderedListStart = try (do
367367 failIfStrict
368368 oneOf ['a'..'n']
369− oneOf ".)"
369+ oneOf ".)")
370370
371371orderedListStart = try $ do
372372 option ' ' newline -- if preceded by a Plain block in a list context