From 4e02ed5f5cd5cf4d07c7252f2aac9a83b9ca7463 Mon Sep 17 00:00:00 2001 From: Sascha Wilde Date: Thu, 16 Nov 2017 02:38:11 +0100 Subject: Creole reader: Fix performance issue for longer lists. (#4075) Fixes #4067. --- src/Text/Pandoc/Readers/Creole.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Text') diff --git a/src/Text/Pandoc/Readers/Creole.hs b/src/Text/Pandoc/Readers/Creole.hs index b4eb6eaef..505d1686d 100644 --- a/src/Text/Pandoc/Readers/Creole.hs +++ b/src/Text/Pandoc/Readers/Creole.hs @@ -194,7 +194,7 @@ endOfParaElement = lookAhead $ endOfInput <|> endOfPara endOfPara = try $ blankline >> skipMany1 blankline startOf :: PandocMonad m => CRLParser m a -> CRLParser m () startOf p = try $ blankline >> p >> return mempty - startOfList = startOf $ anyList 1 + startOfList = startOf $ anyListItem 1 startOfTable = startOf table startOfHeader = startOf header startOfNowiki = startOf nowiki -- cgit v1.2.3