R/cli.R

Defines functions cli_success cli_warning cli_info

# cli_alert* with wrap=TRUE
cli_info <- function(text, .envir = parent.frame()) {
  if (env64$verbose) {
    cli_alert_info(text, wrap = TRUE, .envir = .envir)
  }
}
#' @importFrom cli cli_alert_warning
cli_warning <- function(text, .envir = parent.frame()) {
  if (env64$verbose) {
    cli_alert_warning(text, wrap = TRUE, .envir = .envir)
  }
}
cli_success <- function(text, .envir = parent.frame()) {
  if (env64$verbose) {
    cli_alert_success(text, wrap = TRUE, .envir = .envir)
  }
}

Try the sixtyfour package in your browser

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

sixtyfour documentation built on April 3, 2025, 8:22 p.m.