tests/testthat/test-function-clean_file_name.R

test_that("clean_file_name() works", {

  f <- kwb.fakin:::clean_file_name

  expect_error(f())

  expect_identical(f("abc"), "abc")
})
KWB-R/kwb.fakin documentation built on June 14, 2022, 2 p.m.