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")
})
NCEAS/rt documentation built on June 7, 2021, 11 a.m.