tests/testthat/helper.R

local_colors <- function(colors = 256, .local_envir = parent.frame()) {
  withr::local_envvar(
    list(R_CLI_NUM_COLORS = as.character(colors)),
    .local_envir = .local_envir
  )
}
r-pkgs/crayon documentation built on Nov. 9, 2023, 4:33 p.m.