diff --git a/app/Markdown.hs b/app/Markdown.hs index 56ee488..3dffa1d 100644 --- a/app/Markdown.hs +++ b/app/Markdown.hs @@ -205,6 +205,7 @@ orderedListItem = do char '.' <|> char ')' optional (char ' ' <|> char '\t') content <- many $ notFollowedBy lineEnding' *> inlineElement + lineEnding' -- continuations <- many listContinuation children <- many (try indentedList) pure $ LI content children