Nothing
test_that("Build Listings and Filters", {
skip_on_ci()
skip_on_cran()
# builds for this package's buildtrigger
gcr_trigger_id <- "0a3cade0-425f-4adc-b86b-14cde51af674"
gcr_bt <- cr_build_list_filter(
"trigger_id",
value = gcr_trigger_id
)
expect_snapshot(gcr_bt)
gcr_builds <- cr_build_list(gcr_bt)
expect_s3_class(gcr_builds, "data.frame")
# get logs for last build
last_build <- gcr_builds[1, ]
last_build_logs <- cr_build_logs(log_url = last_build$bucketLogUrl)
expect_true(is.character(last_build_logs))
expect_error(cr_build_list_filter("blah", "=", "boo"))
date_filter <- cr_build_list_filter(
"create_time",
">",
as.Date("2020-01-06") - 5
)
expect_snapshot(date_filter)
})
test_that("Build logs work", {
skip_on_ci()
skip_on_cran()
last_logs <- cr_buildtrigger_logs("package-checks")
expect_true(is.character(last_logs))
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.