From 39a69c4f93d46e059c48a740b69dfff219a5d715 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Sun, 16 May 2021 11:53:19 -0700
Subject: Markdown writer: improve escaping of `@`.

We need to escape literal `@` before `{` because of
the new citation syntax.
---
 src/Text/Pandoc/Writers/Markdown/Inline.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/Text/Pandoc/Writers/Markdown/Inline.hs b/src/Text/Pandoc/Writers/Markdown/Inline.hs
index 2062050e4..ced5fbacb 100644
--- a/src/Text/Pandoc/Writers/Markdown/Inline.hs
+++ b/src/Text/Pandoc/Writers/Markdown/Inline.hs
@@ -56,7 +56,7 @@ escapeText opts = T.pack . go . T.unpack
        '@' | isEnabled Ext_citations opts ->
                case cs of
                     (d:_)
-                      | isAlphaNum d || d == '_'
+                      | isAlphaNum d || d == '_' || d == '{'
                          -> '\\':'@':go cs
                     _ -> '@':go cs
        _ | c `elem` ['\\','`','*','_','[',']','#'] ->
-- 
cgit v1.2.3