tests/testthat/test_opsworks.R

svc <- paws::opsworks()

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

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

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

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

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

Try the paws.management package in your browser

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

paws.management documentation built on Aug. 23, 2021, 9:11 a.m.