@@ -324,7 +324,7 @@ charsInBalanced open close = try $ do
324 char open
324 char open
325 raw <- manyTill ( (do res <- charsInBalanced open close
325 raw <- manyTill ( (do res <- charsInBalanced open close
326 return $ [open] ++ res ++ [close])
326 return $ [open] ++ res ++ [close])
327− <|> (do notFollowedBy' (blankline >> blanklines)
327+ <|> (do notFollowedBy (blankline >> blanklines >> return '\n')
328 count 1 anyChar))
328 count 1 anyChar))
329 (char close)
329 (char close)
330 return $ concat raw
330 return $ concat raw