tests/testthat/test-config.R

In rstudio/cloudml: Interface to the Google Cloud Machine Learning Platform

context("config")

if (identical(Sys.getenv("TRAVIS"), "true")) {
  test_that("gcloud_config() can retrieve account and project from travis", {
    config <- gcloud_config()

    expect_true(!is.null(config$account))
    expect_true(!is.null(config$project))
  })
}