tests/testthat/test-commands.R

In briandconnelly/homebrew: Install and Manage Packages using 'Homebrew'

test_that("input validation for commands", {
  expect_error(brew_cleanup(package = "unixodbc"))
  expect_error(brew_doctor(package = "unixodbc"))
  expect_error(brew_update(package = "unixodbc"))
  expect_error(brew_upgrade(package = "unixodbc"))
  expect_error(brew_outdated(package = "unixodbc"))
})

test_that("brew_outdated returns a list", {
  skip_on_os("windows")
  skip_if_not(has_homebrew(), message = "Homebrew not installed")

  valid_result <- brew_outdated()
  expect_true(is.character(valid_result))
  expect_gte(length(valid_result), 0)
})