diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2021-12-13 12:08:58 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2021-12-13 12:11:58 -0800 |
| commit | 2015c9070d1389b407711cfd699e529fe14bffcd (patch) | |
| tree | 267e6771b8e8d92e08608c30c464437c5b2c8271 /src/Text/Pandoc/Readers | |
| parent | ea77f2e6f653d5b570109fa208dc427d99f95b51 (diff) | |
| download | pandoc-2015c9070d1389b407711cfd699e529fe14bffcd.tar.gz | |
Markdown reader: fix parsing of "bare locators"...
...after author-in-text citations.
Previously `@item [p. 12; @item2]` was incorrectly parsed as
three citations rather than two. This is now fixed by ensuring
that `prefix` doesn't gobble any semicolons.
Diffstat (limited to 'src/Text/Pandoc/Readers')
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index d5a4c322f..b5017a433 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -2216,7 +2216,7 @@ suffix = try $ do prefix :: PandocMonad m => MarkdownParser m (F Inlines) prefix = trimInlinesF . mconcat <$> - manyTill inline (char ']' + manyTill (notFollowedBy (char ';') >> inline) (char ']' <|> lookAhead (try $ do optional (try (char ';' >> spnl)) citeKey True |