#' Mooduli konfiguratsioon andmed #' #' JSONi konfiguratsioon faili lugemine. Muuda seda faili vajadusel. Rakenda seda funktsiooni oma konfiguratsioonifailile. Asendame defaul schema nime "date_YYMMDD" tegeliku tänase kuupäevaga, et ei kirjutaks andmebaasis juhuslikult midagi üle. Oma scema lisamiseks config$schema <- "oma_schema". #' @param conf json fail konfiguratsioon muutujate argumentidega. #' @keywords cats #' @export #' @examples #' config <- get_config() #' config get_config <- function(conf = NULL) { if (is.null(conf)) { config <- rjson::fromJSON(file = system.file("extdata", "config.json", package = "ruut")) config$schema <- sprintf("date_%s", format(Sys.Date(), "%y%m%d")) } else { config <- conf } return(config) }