diff options
| author | John MacFarlane <[email protected]> | 2025-01-31 16:08:10 -0800 |
|---|---|---|
| committer | John MacFarlane <[email protected]> | 2025-01-31 16:08:10 -0800 |
| commit | 8e18a811b40456af47174e7f6b41ebc97c21da8f (patch) | |
| tree | a792b0441a318afdde4ab03f2c4a1d6f22d6924e /src | |
| parent | 6fbb50fc88c841e181a11f5aabf958cd39b04290 (diff) | |
Markdown reader: Simplify and fix normal citation parsing.
Closes #10584.
This fixes a bug that causes some normal citations to be
parsed as bracketed regular citations.
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index b1294fae8..3d4c5da45 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -2267,7 +2267,11 @@ bareloc c = try $ do normalCite :: PandocMonad m => MarkdownParser m (F [Citation]) normalCite = try $ do - citations <- inBalancedBrackets (spnl *> citeList <* spnl) + char '[' + spnl + citations <- citeList + spnl + char ']' -- not a link or a bracketed span notFollowedBy (try (void source) <|> (guardEnabled Ext_bracketed_spans *> void attributes) <|> |