test_that("repo_snapshot() works", {
destdir <- withr::local_tempdir()
suppressMessages(
repo_snapshot("https://maelle.r-universe.dev", destdir = destdir)
)
expect_true(fs::dir_exists(fs::path(destdir, "bin", "macosx", "contrib")))
expect_true(fs::dir_exists(fs::path(destdir, "bin", "windows", "contrib")))
expect_true(fs::dir_exists(fs::path(destdir, "src", "contrib")))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.