R/walk_the_plank.R

#' Run ye code with salty error messages
#' @export
walk_the_plank <- function(code) {

  tryCatch(code,
    error = function(err) {
      err$message <- arrr(err$message)
      stop(err)
    })
}
noamross/arrr documentation built on May 23, 2019, 9:30 p.m.