From a34a4d8e4a06f3595be30dcd117bb204838335e2 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Fri, 28 Apr 2023 22:03:01 -0700 Subject: Commonmark writer: use shortcut reference links. Commonmark supports these. --- src/Text/Pandoc/Writers/Markdown/Inline.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/Text/Pandoc/Writers/Markdown/Inline.hs b/src/Text/Pandoc/Writers/Markdown/Inline.hs index e7be4fc21..235e521be 100644 --- a/src/Text/Pandoc/Writers/Markdown/Inline.hs +++ b/src/Text/Pandoc/Writers/Markdown/Inline.hs @@ -657,7 +657,8 @@ inlineToMarkdown opts lnk@(Link attr@(ident,classes,kvs) txt (src, tit)) = do let useRefLinks = writerReferenceLinks opts && not useAuto shortcutable <- asks envRefShortcutable let useShortcutRefLinks = shortcutable && - isEnabled Ext_shortcut_reference_links opts + (variant == Commonmark || + isEnabled Ext_shortcut_reference_links opts) reftext <- if useRefLinks then literal <$> getReference attr linktext (src, tit) else return mempty -- cgit v1.2.3