tests/testthat/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")
ajwtech/pfsrsdk documentation built on June 14, 2019, 10:34 a.m.