inst/plumber/test/04_test_invites.R

In Tychobra/polishedapi: Authentication and Administration API for Shiny apps

# GET /invite-by-email
res <- httr::GET(
  url = paste0(url_, "/invite-by-email"),
  httr::authenticate(
    user = secret_key,
    password = ""
  ),
  query = list(
    app_uid = app_uid,
    email = test_email
  )
)

dat <- jsonlite::fromJSON(
  httr::content(res, "text", encoding = "UTF-8")
)