tests/testthat/helper-options.R

with_options <- function(opts, code) {
  old_opts <- options(opts)
  on.exit({
    options(old_opts)
  }, add = TRUE)

  force(code)
}
rstudio/plumber documentation built on April 12, 2025, 7:33 p.m.