refactor: небольшие изменения

modules/global_options.R

@@ -54,6 +54,11 @@ check_and_init_scheme = function() {
     "modules/utils.R"
   )
 
+  # проверка существования отслеживаемых файлов
+  if (!all(file.exists(files_to_watch))) {
+    cli::cli_abort("проверка схем: {files_to_watch[!file.exists(files_to_watch)]} is not exists")
+  }
+
   scheme_names <- names(config::get()$form_schemes)
   scheme_file  <- paste0(config::get("form_app_configure_path"), "/schemas/", scheme_names, ".xlsx")
   scheme_file  <- stats::setNames(scheme_file, scheme_names)