diff options
| -rw-r--r-- | src/Text/Pandoc/Shared.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Shared.hs b/src/Text/Pandoc/Shared.hs index d4c59aeb2..1bbe95466 100644 --- a/src/Text/Pandoc/Shared.hs +++ b/src/Text/Pandoc/Shared.hs @@ -324,7 +324,7 @@ charsInBalanced open close = try $ do char open raw <- manyTill ( (do res <- charsInBalanced open close return $ [open] ++ res ++ [close]) - <|> (do notFollowedBy' (blankline >> blanklines) + <|> (do notFollowedBy (blankline >> blanklines >> return '\n') count 1 anyChar)) (char close) return $ concat raw |