tests/testthat/test-golem-recommended.R

context("golem tests")

library(golem)

testthat::test_that("app ui", {
  ui <- app_ui()
  golem::expect_shinytaglist(ui)
})

testthat::test_that("app server", {
  server <- app_server
  testthat::expect_is(server, "function")
})

Try the wpm package in your browser

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

wpm documentation built on Nov. 8, 2020, 5:34 p.m.