tests/testthat/test_workmail.R

svc <- paws::workmail()

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

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

Try the paws.end.user.computing package in your browser

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

paws.end.user.computing documentation built on Sept. 12, 2024, 6:28 a.m.