expand code desc (#90)

* show code description in tooltip --------- Co-authored-by: hlageek <22201406+hlageek@users.noreply.github.com>
RE-QDA · May 8, 2023 · 191b791 · 191b791
1 parent 0a29044
commit 191b791
Show file tree

Hide file tree

Showing 2 changed files with 12 additions and 10 deletions.
diff --git a/R/mod_document_code.R b/R/mod_document_code.R
@@ -125,15 +125,17 @@ mod_document_code_server <- function(id, glob) {
           list(
             loc$code_df$active_codebook$code_id,
             loc$code_df$active_codebook$code_name,
-            loc$code_df$active_codebook$code_color
+            loc$code_df$active_codebook$code_color,
+            loc$code_df$active_codebook$code_description
           ),
           ~ generate_coding_tools(
             ns = ns,
             code_id = ..1,
             code_name = ..2,
-            code_color = ..3
+            code_color = ..3,
+            code_desc = ..4)
           )
-        )
+
       } else {
         ""
       }

diff --git a/R/mod_document_code_utils_document_code.R b/R/mod_document_code_utils_document_code.R
@@ -462,14 +462,14 @@ delete_segment_codes_db <- function(pool,
 # Generate coding tools -------------------------------------------------
 
 
-generate_coding_tools <- function(ns, code_id, code_name, code_color) {
-    
+generate_coding_tools <- function(ns, code_id, code_name, code_color, code_desc) {
+
     actionButton(inputId = ns(code_id),
-                 label = code_name,
-                 name = code_id,
-                 class = "code-button",
-                 title = code_name,
-                 style = paste0("background: none;
+               label = code_name,
+               name = code_id,
+               class = "code-button",
+               title = paste(code_desc),
+               style = paste0("background: none;
                        width: 100%;
                        border-left: 5px solid ", code_color, ";"),
                  onclick = paste0("Shiny.setInputValue('", ns("selected_code"), "', this.name, {priority: 'event'});"))