diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2021-11-30 12:53:54 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2021-11-30 12:53:54 -0800 |
| commit | 619dfa2a2a19a8433424e830a21384c7b520866a (patch) | |
| tree | cef94c725c67c437f6fb9b3f2851703c032ce89a | |
| parent | 6e712fa10a9f6c2f562479acf8024f2fb529bb68 (diff) | |
| download | pandoc-619dfa2a2a19a8433424e830a21384c7b520866a.tar.gz | |
Markdown reader: don't allow `^` at beginning of link or image label.
This is reserved for footnotes.
Fixes a regression introduced by 0a93acf.
Closes #7723.
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 3 | ||||
| -rw-r--r-- | test/command/7723.md | 8 |
2 files changed, 9 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index b72ab22e2..0d4592599 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -1775,8 +1775,7 @@ endline = try $ do -- a reference label for a link reference :: PandocMonad m => MarkdownParser m (F Inlines, Text) reference = do - -- guardDisabled Ext_footnotes <|> notFollowedBy' (string "[^") - -- guardDisabled Ext_citations <|> notFollowedBy' (string "[@") + guardDisabled Ext_footnotes <|> notFollowedBy' (string "[^") withRaw $ trimInlinesF <$> inlinesInBalancedBrackets parenthesizedChars :: PandocMonad m => MarkdownParser m Text diff --git a/test/command/7723.md b/test/command/7723.md new file mode 100644 index 000000000..f3229eb1e --- /dev/null +++ b/test/command/7723.md @@ -0,0 +1,8 @@ +``` +% pandoc -t native +Bug![^1] + +[^1]: Note. +^D +[ Para [ Str "Bug!" , Note [ Para [ Str "Note." ] ] ] ] +``` |