tests/testthat/test_route53recoverycontrolconfig.R

In paws.networking: 'Amazon Web Services' Networking & Content Delivery Services

svc <- paws::route53recoverycontrolconfig()

test_that("list_clusters", {
  expect_error(svc$list_clusters(), NA)
})

test_that("list_clusters", {
  expect_error(svc$list_clusters(MaxResults = 20), NA)
})

test_that("list_control_panels", {
  expect_error(svc$list_control_panels(), NA)
})

test_that("list_control_panels", {
  expect_error(svc$list_control_panels(MaxResults = 20), NA)
})