tests/testthat/test_e_qr_event.R

test_that("qr_event()", {
  expect_s3_class(
    qr_event(start = Sys.time(), end = Sys.time(), title = "my event"),
    c("qr_code", "qr_event")
  )
})
ThierryO/qrcode documentation built on Oct. 2, 2024, 9:02 p.m.