Apply the styles to the markdown wrapper node, not the children

This commit is contained in:
Micah Hahn 2023-05-01 14:38:39 -05:00
parent 95a0dd0e46
commit 8e7f053f07

View File

@ -278,13 +278,13 @@ renderContent content_ styles =
tag =
case markdown of
Bold ->
strong []
strong [ css styles ]
Italic ->
em []
em [ css styles ]
in
contents
|> List.map (\c -> renderContent c styles)
|> List.map (\c -> renderContent c [])
|> tag