Creole reader: Fix performance issue for longer lists. (#4075)

Fixes #4067.
jgm · Nov 16, 2017 · 4e02ed5 · 4e02ed5
1 parent 508aab0
commit 4e02ed5
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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