tests/testthat/test-add.R

context("add")

test_that("add",{
  timesheet <- pts_add_entry(poistimesheets::timesheet, as.Date("2011-05-22"))
  expect_identical(check_timesheet(timesheet, nrow = nrow(poistimesheets::timesheet) + 1L), timesheet)
})
poissonconsulting/poistimesheets documentation built on Jan. 24, 2020, 4:54 a.m.