tests/test-update_dependencies.R

In repo.data: R Repository Data

library("repo.data")
pkg <- "ggeasy"
pd <- package_dependencies(pkg)
ud <- update_dependencies(pkg)
stopifnot(as.logical(length(ud)))
stopifnot(NROW(ud) <= NROW(pd))

pkg <- "teal"
rd <- repos_dependencies(pkg)
pd <- package_dependencies(pkg)
diff <- merge(pd, rd, by = "Name")

ud <- suppressWarnings(update_dependencies(pkg))
m <- merge(ud, pd, all = FALSE)
stopifnot("Packages that don't need updating show up on update_dependencies" = NROW(m) <= NROW(diff))