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
This commit is contained in:
fiddlosopher 2007-03-16 06:05:43 +00:00
parent 0d2e5eab79
commit cdf7c78b5f

View file

@ -359,14 +359,14 @@ bulletListStart = try (do
spaceChar
skipSpaces)
standardOrderedListStart = do
standardOrderedListStart = try (do
many1 digit
char '.'
char '.')
extendedOrderedListStart = do
extendedOrderedListStart = try (do
failIfStrict
oneOf ['a'..'n']
oneOf ".)"
oneOf ".)")
orderedListStart = try $ do
option ' ' newline -- if preceded by a Plain block in a list context