diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2006-12-16 19:43:00 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2006-12-16 19:43:00 +0000 |
commit | 7c319e55ff641b57688297c5e67169ec316235b1 (patch) | |
tree | 3cad75c4102b6c9925480f7c3dd62f9cc4f017b9 /src | |
parent | 4ab3eb300360688004a597417f6ce79d828dcf91 (diff) | |
download | pandoc-7c319e55ff641b57688297c5e67169ec316235b1.tar.gz |
Modified markdown reader to allow ordered list items to begin
with (single) letters, as well as numbers. The list item marker
may now be terminated either by '.' or by ')'. These extensions
to standard markdown are documented in README.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@211 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src')
-rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index df2f43e87..cbefa09fe 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -45,7 +45,7 @@ autoLinkEnd = '>' mathStart = '$' mathEnd = '$' bulletListMarkers = "*+-" -orderedListDelimiters = "." +orderedListDelimiters = ".)" escapeChar = '\\' hruleChars = "*-_" quoteChars = "'\"" @@ -276,7 +276,7 @@ orderedListStart = try (do option ' ' newline -- if preceded by a Plain block in a list context skipNonindentSpaces - many1 digit + many1 digit <|> count 1 letter oneOf orderedListDelimiters oneOf spaceChars skipSpaces) @@ -535,7 +535,7 @@ title = choice [titleWith '(' ')', titleWith '"' '"', titleWith '\'' '\''] <?> " link = choice [explicitLink, referenceLink] <?> "link" -explicitLink = +explicitLink = try (do label <- reference src <- source |