testing environment variable LOCAL for js

ComPlat · Dec 18, 2024 · 8339784 · 8339784
1 parent 204bd2b
commit 8339784
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 2 deletions.
diff --git a/app/MainApp.R b/app/MainApp.R
@@ -356,6 +356,7 @@ app <- function() {
     output$conditional_data_ui <- renderUI({
       showNotification(Sys.getenv("RUN_MODE"), duration = 0)
       showNotification(as.character(Sys.getenv("RUN_MODE") != "SERVER"), duration = 0)
+      res <- NULL
       if (Sys.getenv("RUN_MODE") != "SERVER") {
       showNotification("Test", duration = 0)
         res <- conditionalPanel(
@@ -368,8 +369,10 @@ app <- function() {
             )
           )
         )
-        return(res)
+        # return(res)
       }
+      str(res)
+      return(res)
     })
 
     download_file <- reactive({

diff --git a/bs/R/MainApp.R b/bs/R/MainApp.R
@@ -356,6 +356,7 @@ app <- function() {
     output$conditional_data_ui <- renderUI({
       showNotification(Sys.getenv("RUN_MODE"), duration = 0)
       showNotification(as.character(Sys.getenv("RUN_MODE") != "SERVER"), duration = 0)
+      res <- NULL
       if (Sys.getenv("RUN_MODE") != "SERVER") {
       showNotification("Test", duration = 0)
         res <- conditionalPanel(
@@ -368,8 +369,10 @@ app <- function() {
             )
           )
         )
-        return(res)
+        # return(res)
       }
+      str(res)
+      return(res)
     })
 
     download_file <- reactive({