diff options
| author | Sascha Wilde <wilde@sha-bang.de> | 2017-11-16 02:38:11 +0100 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2017-11-15 17:38:11 -0800 |
| commit | 4e02ed5f5cd5cf4d07c7252f2aac9a83b9ca7463 (patch) | |
| tree | 2e9c3aa230644ad2fee8f29d1f7e5432b30ea5e8 /src | |
| parent | 508aab0bd555b4ca7632a78957ebb91c758f0a7e (diff) | |
Creole reader: Fix performance issue for longer lists. (#4075)
Fixes #4067.
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Readers/Creole.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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 |