diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2010-12-13 15:50:03 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2010-12-13 20:03:12 -0800 |
| commit | 71e0557e61f01f2442717b02f0789b3b39c0c52d (patch) | |
| tree | 28223c472f84b3cd512fbc6ebe7cc9c011a9134e | |
| parent | 77cb199d45873342495df42a80ed563f8f79bd0d (diff) | |
| download | pandoc-71e0557e61f01f2442717b02f0789b3b39c0c52d.tar.gz | |
Markdown reader: Fixed regression in reference key parser.
* The recent change allowing spaces and newlines in the URL
caused problems when reference keys are stacked up without
blank lines between. This is now fixed.
* Added test.
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 1 | ||||
| -rw-r--r-- | tests/testsuite.txt | 1 |
2 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index 88aae7b3f..f27d0635c 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -207,6 +207,7 @@ referenceKey = try $ do notFollowedBy' referenceTitle skipMany (oneOf " \t") optional nl + optional nonindentSpaces notFollowedBy' reference skipMany (oneOf " \t") many1 (noneOf " \t\n") diff --git a/tests/testsuite.txt b/tests/testsuite.txt index a8730878a..91074efad 100644 --- a/tests/testsuite.txt +++ b/tests/testsuite.txt @@ -631,7 +631,6 @@ Indented [thrice][]. This should [not][] be a link. [once]: /url - [twice]: /url [thrice]: /url |