R/prep_description.R

Defines functions description

#' @include lists.R
#' @importFrom desc description

PREPS$description <- function(state, path = state$path, quiet) {
  state$description <- try(description$new(file.path(path, "DESCRIPTION")), 
                           silent = quiet)
  if(inherits(state$description, "try-error")) {
    warning("Prep step for description failed.")
  }
  state
}

Try the goodpractice package in your browser

Any scripts or data that you put into this service are public.

goodpractice documentation built on Aug. 31, 2022, 1:05 a.m.