R/has-tests.R

Defines functions has_tests

Documented in has_tests

#' Was devtools installed with tests?
#'
#' @keywords internal
#' @export
has_tests <- function() {
  test_path <- tryCatch(
    path_package("devtools", "tests"),
    error = function(e) NULL
  )

  !is.null(test_path)
}

Try the devtools package in your browser

Any scripts or data that you put into this service are public.

devtools documentation built on Nov. 5, 2025, 7:41 p.m.