R/use-safely.R

In hrbrmstr/freebase: A 'usethis'-esque Package for Base R Versions of 'tidyverse' Code

#' Use base R versions of `purrr` `safely` functions
#'
#' * Creates base R versions of `purrr` `safely` (et al).
#'
#' @md
#' @param save_as File path and name. Defaults to "`R/utils-safely.R`"
#' @param open if `TRUE`, open the resultant file
#' @export
use_safely <- function(save_as = "R/utils-safely.R", open = TRUE) {

  check_is_package("use_safely()")

  use_template("safely.R", save_as = save_as, open = open, package = "freebase")

}