inst/templates/unit_tests/tests/testthat/test-main.R

box::use(
  shiny[testServer],
  testthat[...],
)
box::use(
  app/main[...],
)

test_that("main server works", {
  testServer(server, {
    expect_equal(output$message, "Hello!")
  })
})
kamilzyla/rhino documentation built on May 1, 2022, 7:34 a.m.