R/session.R

Defines functions renv_session_quiet

renv_session_quiet <- function() {

  args <- commandArgs(trailingOnly = FALSE)

  index <- match("--args", args)
  if (!is.na(index))
    args <- head(args, n = index - 1L)

  quiet <- c("-s", "--slave", "--no-echo")
  any(quiet %in% args)

}
rstudio/renv documentation built on July 8, 2024, 5:48 a.m.