tests/testthat/test-ui_date_tool.R

test_that("date_tool", {
  expect_error(dateInput_range(date = NULL, date = ""))
  expect_error(dateInput_range(character(0L)))
  expect_error(dateInput_ramge(date = "word"))
  expect_error(dateInput_range(end > start))
})
etc5523-2020/r-package-assessment-samuellyu-2021 documentation built on Jan. 1, 2021, 1:13 a.m.