tests/testthat/test-function-get_user_strings.R

test_that("get_user_strings() works", {

  kwb.prep:::set_global("user_strings", NULL)
  result <- kwb.prep::get_user_strings()
  expect_null(result)
})
KWB-R/kwb.prep documentation built on June 11, 2022, 1:29 p.m.