tests/integrated/test-remote.R

In connectapi: Utilities for Interacting with the 'Posit Connect' Server API

# TODO: This testing requires an LDAP server
# TODO: use the same underlying implementation somehow...
context("users_create_remote")

test_that("errors if prefix returns zero matches", {
  skip("not implemented")
})
test_that("errors if prefix returns more than one matches", {
  skip("not implemented")
})
test_that("errors if expect is greater than one", {
  skip("not implemented")
})
test_that("works if match already exists", {
  # should message
  skip("not implemented")
})
test_that("creates match if one is found", {
  skip("not implemented")
})
test_that("creates multiples if multiple are found", {
  skip("not implemented")
})
test_that("avoids existing matches if multiple are found", {
  # fails today
  skip("not implemented")
})

context("groups_create_remote")
test_that("errors if prefix returns zero matches", {
  skip("not implemented")
})
test_that("errors if prefix returns more than one matches", {
  skip("not implemented")
})
test_that("errors if expect is greater than one", {
  skip("not implemented")
})
test_that("works if match already exists", {
  # should message
  skip("not implemented")
})
test_that("creates match if one is found", {
  skip("not implemented")
})
test_that("creates multiples if multiple are found", {
  skip("not implemented")
})
test_that("avoids existing matches if multiple are found", {
  # fails today
  skip("not implemented")
})