tests/testthat/test-function-read_file_info_.R

test_that("read_file_info_() works", {

  f <- fakin.path.app:::read_file_info

  expect_warning(expect_error(f()))

  file <- extdata_file("example_file_info_1.csv")

  expect_warning(f(file))
})
KWB-R/fakin.path.app documentation built on Nov. 25, 2020, 10:20 p.m.