diff options
| -rw-r--r-- | src/Text/Pandoc/Readers/LaTeX.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index 5a4612862..d2e8d9d17 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -132,7 +132,9 @@ comment = do return () bgroup :: LP () -bgroup = () <$ char '{' +bgroup = try $ do + skipMany (spaceChar <|> try (newline <* notFollowedBy blankline)) + () <$ char '{' <|> () <$ controlSeq "bgroup" <|> () <$ controlSeq "begingroup" |