R/get_config.R

In zkamvar/sandpaper: Create and Curate Carpentries Lessons

#' Get the configuration parameters for the lesson
#'
#' @param path path to the lesson
#' @return a yaml list
#' @export
#' @examples
#' tmp <- tempfile()
#' create_lesson(tmp, open = FALSE, rmd = FALSE)
#' get_config(tmp)
get_config <- function(path = ".") {
  cfg <- path_config(path)
  if (!fs::file_exists(cfg)) {
    stop("config file does not exist")
  }
  yaml::read_yaml(cfg, eval.expr = FALSE)
}