tests/testthat/test_rt_ticket_merge.R

context("ticket/merge")

test_that("a ticket can be merged", {
  testthat::skip_on_cran()
  skip_unless_integration()

  tik1 <- rt_ticket_create("General")
  tik2 <- rt_ticket_create("General")
  merge_result <- rt_ticket_merge(tik1, tik2)

  testthat::expect_is(merge_result, "numeric")
})

Try the rt package in your browser

Any scripts or data that you put into this service are public.

rt documentation built on May 15, 2021, 9:06 a.m.