context("corner")
test_that("empty web", {
tmp_dir <- tempfile()
dir.create(tmp_dir)
web <- rpkgweb(tmp_dir)
expect_equal(length(web), 0)
expect_match(format(web), "without any packages")
test_make(web, dry_run = TRUE)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.