refactor: некоторые изменения кода

helpers/init_login_db.r

@@ -1,19 +0,0 @@
-# script to setup authentification database (using shinymanager)
-
-# SETUP AUTH =============================
-# Init DB using credentials data
-credentials <- data.frame(
-  user = c("admin", "user"),
-  password = c("admin", "user"),
-  # password will automatically be hashed
-  admin = c(TRUE, FALSE),
-  stringsAsFactors = FALSE
-)
-
-# Init the database
-shinymanager::create_db(
-  credentials_data = credentials,
-  sqlite_path = "auth.sqlite", # will be created
-  passphrase = Sys.getenv("AUTH_DB_KEY")
-  # passphrase = "passphrase_wihtout_keyring"
-)

helpers/scheme_generator.R

@@ -76,6 +76,7 @@ scheme_R6 <- R6::R6Class(
       private$schemes_list[[table_name]]
     },
     get_id_type_list = function(table_name) {
+
       # wo main key
       this_key_id <- self$get_key_id(table_name)