@@ -359,14 +359,14 @@ bulletListStart = try (do
359 spaceChar
359 spaceChar
360 skipSpaces)
360 skipSpaces)
362−standardOrderedListStart = do
362+standardOrderedListStart = try (do
363 many1 digit
363 many1 digit
364− char '.'
364+ char '.')
366−extendedOrderedListStart = do
366+extendedOrderedListStart = try (do
367 failIfStrict
367 failIfStrict
368 oneOf ['a'..'n']
368 oneOf ['a'..'n']
369− oneOf ".)"
369+ oneOf ".)")
371orderedListStart = try $ do
371orderedListStart = try $ do
372 option ' ' newline -- if preceded by a Plain block in a list context
372 option ' ' newline -- if preceded by a Plain block in a list context