Add notification

llrs-roche · llrs-roche · commit dd4f1b9ba973 · 2025-10-14T13:48:21.000+02:00
diff --git a/R/tm_outliers.R b/R/tm_outliers.R
@@ -745,7 +745,8 @@ srv_outliers <- function(id, data, outlier_var,
         })
       } else {
         msg <- "No categorical variable selected, summary table cannot be created."
-        warning(msg)
+        showNotification(msg, closeButton = FALSE, type = "warning",
+                         id = session$ns("no_summary_table"))
         within(qenv, cat(msg), msg = msg)
       }
 

Original file line number	Diff line number	Diff line change
`@@ -745,7 +745,8 @@ srv_outliers <- function(id, data, outlier_var,`
`745`	`745`	`})`
`746`	`746`	`} else {`
`747`	`747`	`msg <- "No categorical variable selected, summary table cannot be created."`
`748`		`- warning(msg)`
	`748`	`+ showNotification(msg, closeButton = FALSE, type = "warning",`
	`749`	`+ id = session$ns("no_summary_table"))`
`749`	`750`	`within(qenv, cat(msg), msg = msg)`
`750`	`751`	`}`
`751`	`752`