aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-08-28 06:04:57 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-08-28 06:04:57 +0000
commit6765fadd12a2019e8ff66ae647ab675b2db98a43 (patch)
tree86d960cd091e235e31afa65b86ef35e9442f1baf /src/Text/Pandoc
parentf10ac4359c55d31a198e907c3f30c35eed11ab3e (diff)
downloadpandoc-6765fadd12a2019e8ff66ae647ab675b2db98a43.tar.gz
Use notFollowedBy instead of notFollowedBy' in charsInBalanced.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@929 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Shared.hs2
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