summaryrefslogtreecommitdiff
path: root/src/Text
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text')
-rw-r--r--src/Text/Pandoc/Readers/Org/Inlines.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Org/Inlines.hs b/src/Text/Pandoc/Readers/Org/Inlines.hs
index dd27ad91a..1cb945c1e 100644
--- a/src/Text/Pandoc/Readers/Org/Inlines.hs
+++ b/src/Text/Pandoc/Readers/Org/Inlines.hs
@@ -892,7 +892,8 @@ macro = try $ do
updateState $ \s -> s { orgStateMacroDepth = recursionDepth }
return res
where
- argument = manyChar $ notFollowedBy eoa *> noneOf ","
+ argument = manyChar $ notFollowedBy eoa *> (escapedComma <|> noneOf ",")
+ escapedComma = try $ char '\\' *> oneOf ",\\"
eoa = string ")}}}"
smart :: PandocMonad m => OrgParser m (F Inlines)