tests/testthat/test-reporter-summary.R

test_that("can control appearance of dots", {
  expect_snapshot_reporter(SummaryReporter$new(show_praise = FALSE, omit_dots = FALSE))
  expect_snapshot_reporter(SummaryReporter$new(show_praise = FALSE, omit_dots = TRUE))
})

test_that("can control maximum reports", {
  expect_snapshot_reporter(SummaryReporter$new(show_praise = FALSE, max_reports = 2))
})

Try the testthat package in your browser

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

testthat documentation built on Jan. 21, 2022, 1:10 a.m.