refactor: some code tweaking

2026-04-13 09:41:30 +03:00
parent f9d84bf245
commit 4225c4d382
5 changed files with 22 additions and 17 deletions
--- a/modules/scheme_generator.R
+++ b/modules/scheme_generator.R
@@ -36,7 +36,12 @@ scheme_R6 <- R6::R6Class(
      private$main_key_id <- self$get_key_id("main")

      box::use(modules/utils)
-      private$testest     <- utils$make_list_of_pages(private$schemes_list[["main"]], private$main_key_id)
+      private$testest <- bslib::navset_card_underline(
+        id = "main",
+        !!!utils$make_list_of_pages(private$schemes_list[["main"]], private$main_key_id),
+        header = NULL,
+        height = NULL
+      )
    },

    get_all_ids = function(table_name) {