refactor: перенос объявление enabled_schema в отдельный файл в папке configs

This commit is contained in:
2026-04-17 16:26:12 +03:00
parent b5260a510f
commit be1623716c
3 changed files with 14 additions and 15 deletions

View File

@@ -18,23 +18,18 @@ set_global_options = function(
)
}
#' @export
enabled_schemas <- c(
`Тестовая база данных` = "example_of_scheme"
# `D2TRA (для отладки)` = "d2tra_t"
)
#' @export
check_and_init_scheme = function() {
cli::cli_inform(c("*" = "проверка схемы..."))
files_to_watch <- c(
"configs/enabled_schemes.R",
"modules/scheme_generator.R",
"modules/utils.R"
)
scheme_names <- enabled_schemas
scheme_names <- enabled_schemes
scheme_file <- paste0("configs/schemas/", scheme_names, ".xlsx")
scheme_file <- stats::setNames(scheme_file, scheme_names)