tests/testthat/test-run-examples.R

test_that("Can run an example", {
  pkg <- "testHelp"
  expect_output(
    suppressMessages(run_examples(pkg = pkg, document = FALSE)),
    "You called foofoo.",
    fixed = TRUE
  )
})
thierrymoudiki/devtools documentation built on July 28, 2020, 12:58 a.m.