tests/testthat/test_cloudwatchlogs.R

svc <- paws::cloudwatchlogs()

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

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

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

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

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

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

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

test_that("describe_resource_policies", {
  expect_error(svc$describe_resource_policies(), 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 Sept. 12, 2023, 1:06 a.m.