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
  )
}
gaborcsardi/crayon documentation built on Aug. 6, 2024, 9:22 p.m.