patch for NULL issue

RinteRface · Feb 8, 2023 · fd92ce4 · fd92ce4
1 parent 56dfa4e
commit fd92ce4
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/R/heatmap.R b/R/heatmap.R
@@ -336,6 +336,11 @@ process_heatmap <- function(...) {
   # process_heatmap is called in server.R
   session <- get("session", envir = parent.frame(n = 1))
 
+  # Init global option
+  if (is.null(getOption("shinyHeatmap.debug"))) {
+    options("shinyHeatmap.debug" = FALSE)
+  }
+
   # Trigger once
   observeEvent({
     session$clientData