test_that ("list-checks", {
expect_message (
chks <- list_pkgchecks (),
"The following checks are currently implemented"
)
expect_length (chks, 19L)
expect_silent (
chks2 <- list_pkgchecks (quiet = TRUE)
)
expect_identical (chks, chks2)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.