Expected `r_both_error$warnings$issues` to have length 1.
Actual length: 0.

create_temp_repo <- function(dir, repo_path) {
contrib_url <- utils::contrib.url(repo_path, type = "source")
sources <- list.files(dir, pattern = "^.*\\.tar\\.gz$", full.names = TRUE)
vapply(sources, file.copy, FUN.VALUE = logical(1), to = contrib_url)
sources_old <- test_path("fixtures", "revdeps", "v1")
sources_new <- test_path("fixtures", "revdeps", "v2")
test_that("check_rev_deps works for package with no revdeps", {
# Ensure source installation to make sure test works also on mac and windows
test_that("check_rev_deps works for package with one breaking change", {
both_error_i <- which(grepl("rev.both.error", names(r[[1]]), fixed = TRUE))
grepl("Missing or unexported object", r_both_error$warnings$issues)
grepl("Running the tests in", r_both_error$errors$issues)
grepl("is not an exported object from", r_both_error$errors$issues)
both_ok_i <- which(grepl("rev.both.ok", names(r[[1]]), fixed = TRUE))
test_that("check_rev_deps works for a package without a version in repos", {
list.dirs(file.path(design$output, "checks"), recursive = FALSE),
none_broken_i <- which(grepl("pkg.none.broken-", names(r[[1]]), fixed = TRUE))
grepl("Running the tests in", r_none_broken$errors$issues)
grepl("there is no package called", r_none_broken$errors$issues)
grepl("Running the tests in", r_none$errors$issues)
grepl("Reverse suggested deps detected", r_none$errors$issues)
g_i <- plot(design$graph, interactive = TRUE)

"check_rev_deps works for package with no revdeps"
"check_rev_deps works for package with one breaking change"
"check_rev_deps works for a package without a version in repos"

check_rev_deps works for package with one breaking change

Expected `grepl("Missing or unexported object", r_both_error$warnings$issues)` to be TRUE.
Differences:
`actual`:       
`expected`: TRUE

Expected `r_both_error$errors$issues` to have length 1.
Actual length: 0.

Expected `grepl("Running the tests in", r_both_error$errors$issues)` to be TRUE.
Differences:
`actual`:       
`expected`: TRUE