Compare commits
2 commits
a69ddb2f92
...
5d29e8165e
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
5d29e8165e | ||
|
|
874803d89e |
2 changed files with 2 additions and 1 deletions
|
|
@ -205,6 +205,7 @@ orderedListItem = do
|
||||||
char '.' <|> char ')'
|
char '.' <|> char ')'
|
||||||
optional (char ' ' <|> char '\t')
|
optional (char ' ' <|> char '\t')
|
||||||
content <- many $ notFollowedBy lineEnding' *> inlineElement
|
content <- many $ notFollowedBy lineEnding' *> inlineElement
|
||||||
|
lineEnding'
|
||||||
-- continuations <- many listContinuation
|
-- continuations <- many listContinuation
|
||||||
children <- many (try indentedList)
|
children <- many (try indentedList)
|
||||||
pure $ LI content children
|
pure $ LI content children
|
||||||
|
|
|
||||||
|
|
@ -29,7 +29,7 @@ test-suite test-markdown-parse
|
||||||
hs-source-dirs: app
|
hs-source-dirs: app
|
||||||
type: exitcode-stdio-1.0
|
type: exitcode-stdio-1.0
|
||||||
main-is: Tests/Markdown/Parse.hs
|
main-is: Tests/Markdown/Parse.hs
|
||||||
build-depends: base >=4.20 && < 4.21, text >= 2.1.2 && < 2.2, megaparsec >= 9.7.0 && < 9.8, transformers >= 0.6.2 && < 0.7, hedgehog >= 1.7 && < 1.8, time >= 1.15 && < 1.16
|
build-depends: base >=4.20 && < 4.21, text >= 2.1.2 , megaparsec >= 9.7.0 , transformers >= 0.6.2 , hedgehog >= 1.7 , time
|
||||||
|
|
||||||
default-extensions: ApplicativeDo DataKinds NamedFieldPuns DerivingVia LambdaCase TypeApplications DeriveGeneric OverloadedRecordDot NamedFieldPuns DuplicateRecordFields DisambiguateRecordFields FlexibleInstances
|
default-extensions: ApplicativeDo DataKinds NamedFieldPuns DerivingVia LambdaCase TypeApplications DeriveGeneric OverloadedRecordDot NamedFieldPuns DuplicateRecordFields DisambiguateRecordFields FlexibleInstances
|
||||||
other-modules: IR Logger Markdown Utilities
|
other-modules: IR Logger Markdown Utilities
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue