tests/testthat/test-convert_markdown2html.R

test_that("multiplication works", {
  css <- tempfile(pattern = "file", fileext = ".css")
  on.exit(unlink(css), add = TRUE)
  cat("html {}\n", file = css)

  out <- convert_markdown2html("# hello", stylesheet = css, template = FALSE)
  exp <- "<h1 id=\"hello\">hello</h1>\n"
  expect_equal(out, exp)
})

Try the juicedown package in your browser

Any scripts or data that you put into this service are public.

juicedown documentation built on Sept. 8, 2023, 5:11 p.m.