tests/testthat/setup_auth.R

if (gargle:::secret_can_decrypt("boxr")) {
  raw <- gargle:::secret_read("boxr", "boxr-testing.json")
  text <- rawToChar(raw)
  box_auth_service(token_text = text)
}

Try the boxr package in your browser

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

boxr documentation built on Jan. 19, 2021, 5:06 p.m.