aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Readers/LaTeX/Parsing.hs6
1 files changed, 5 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX/Parsing.hs b/src/Text/Pandoc/Readers/LaTeX/Parsing.hs
index 6d6d4f3ec..09f332bb8 100644
--- a/src/Text/Pandoc/Readers/LaTeX/Parsing.hs
+++ b/src/Text/Pandoc/Readers/LaTeX/Parsing.hs
@@ -484,7 +484,11 @@ doMacros' n inp =
Nothing -> mzero
Just (Macro expansionPoint argspecs optarg newtoks) -> do
let getargs' = do
- args <- case optarg of
+ args <-
+ (case expansionPoint of
+ ExpandWhenUsed -> withVerbatimMode
+ ExpandWhenDefined -> id)
+ $ case optarg of
Nothing -> getargs M.empty argspecs
Just o -> do
x <- option o bracketedToks