tests/testthat/acceptance_tests/setup.R

# sink the output down to nowhere for cleaner testing.
results <- file("Results.Rout", open = "wt")
sink(results, type = "message")
api <- coreAPI(env$auth)
con <- suppressWarnings(authBasic(api, useVerbose = verbose))
data <- jsonlite::fromJSON(env$data)
# configure test environment for JSON SDK usage
pfsrsdk:::loadXmlConfigFile(con$coreApi, appName = "core_CoreApp.SDK")
AmundsenJunior/pfsrsdk documentation built on July 18, 2019, 8:10 p.m.