test_that("wa_markdown defaults render the minimal wrapper", { expect_exact_html( render_html(shiny.webawesome:::wa_markdown()), c("") ) }) test_that("wa_markdown renders child content and attrs", { expect_exact_html( render_html( shiny.webawesome:::wa_markdown( "# Heading", id = "markdown", class = "prose", style = "max-width: 60ch;", dir = "ltr", lang = "en", tab_size = 2 ) ), c( paste0( '# Heading' ) ) ) })