From 6765fadd12a2019e8ff66ae647ab675b2db98a43 Mon Sep 17 00:00:00 2001 From: fiddlosopher Date: Tue, 28 Aug 2007 06:04:57 +0000 Subject: Use notFollowedBy instead of notFollowedBy' in charsInBalanced. git-svn-id: https://pandoc.googlecode.com/svn/trunk@929 788f1e2b-df1e-0410-8736-df70ead52e1b --- src/Text/Pandoc/Shared.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 -- cgit v1.2.3