diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index 107c9f1fc..571a9ef88 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -639,9 +639,9 @@ inline = do "}" -> mzero _ -> symbolAsString CtrlSeq _ -> macroDef (rawInline "latex") + <|> inlineGroup <|> inlineCommand' <|> inlineEnvironment - <|> inlineGroup _ -> mzero inlines :: PandocMonad m => LP m Inlines diff --git a/test/command/7953.md b/test/command/7953.md new file mode 100644 index 000000000..118aea2b6 --- /dev/null +++ b/test/command/7953.md @@ -0,0 +1,11 @@ +``` +% pandoc -f latex -t native +{foo\bgroup bar\egroup } +^D +[ Para + [ Span + ( "" , [] , [] ) + [ Str "foo" , Span ( "" , [] , [] ) [ Str "bar" ] ] + ] +] +``` diff --git a/test/command/tex-group.md b/test/command/tex-group.md index 277b32142..cc0ed219b 100644 --- a/test/command/tex-group.md +++ b/test/command/tex-group.md @@ -8,5 +8,5 @@ hi \end{foo} ^D -<p><em>hi</em></p> +<p><span> <em>hi</em> </span></p> ```