From 6765fadd12a2019e8ff66ae647ab675b2db98a43 Mon Sep 17 00:00:00 2001
From: fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>
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(-)

(limited to 'src/Text/Pandoc')

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