R/verbose.R

In slopp/renv: Project Environments for R

renv_verbose <- function() {

  verbose <- getOption("renv.verbose")
  if (!is.null(verbose))
    return(verbose)

  verbose <- Sys.getenv("RENV_VERBOSE", unset = NA)
  if (!is.na(verbose))
    return(TRUE)

  interactive()

}