diff options
-rw-r--r-- | src/Text/Pandoc/Readers/LaTeX.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index abc137fd1..b619a3a89 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -1559,10 +1559,11 @@ newcommand = do case mtype of "DeclareMathOperator" -> Tok pos (CtrlSeq "mathop") "\\mathop" + : Tok pos Symbol "{" : Tok pos (CtrlSeq "mathrm") "\\mathrm" : Tok pos Symbol "{" : (contents' ++ - [ Tok pos Symbol "}" ]) + [ Tok pos Symbol "}", Tok pos Symbol "}" ]) _ -> contents' when (mtype == "newcommand") $ do macros <- sMacros <$> getState |