Build out list items

This commit is contained in:
Florian Schroedl
2022-10-14 21:21:40 +02:00
parent cc1064a40a
commit 8d35a273fd

View File

@@ -10,6 +10,10 @@ import ./org_types
import ./org_builder_api
import ./org_builder_link.nim
import ../parser/parser
import ../utils/fp
import fusion/matching
{.experimental: "caseStmtMacros".}
# let lineTokenizer = (builder: OrgInlineBuilder) => tryTokenize(
# builder = builder,
@@ -60,7 +64,10 @@ proc buildListItem(builder: OrgBuilder): OrgBuilderResult =
.flatMap(listContentParser)
.map(flattenTokens)
echo listContent
let y = case (beforeSpaces, listType, listContent):
of (Some(@a), Some(@b), Some(@c)): c.tokens.tokensToString()
else: ""
echo y
builder.ok()