Added 'demo' as dummy if sitename is not provided to use the exampledata

R/moduleDashboard.R

@@ -54,6 +54,7 @@ module_dashboard_server <-
         # check if sitename is present
         if (nchar(input_re()[["moduleConfig-config_sitename"]]) < 2 ||
             any(grepl("\\s", input_re()[["moduleConfig-config_sitename"]]))) {
+          # site name is missing:
           shiny::showModal(modalDialog(
             title = "Invalid values",
             paste0(
@@ -61,9 +62,11 @@ module_dashboard_server <-
               "the site name configuration."
             )
           ))
-          error_tmp <- T
-          # site name is present
+          ## TODO: Delete the demo-sitename and re-enable the error_tmp
+          rv$sitename <- "Demo"
+          # error_tmp <- T
         } else {
+          # site name is present:
           rv$sitename <- input_re()[["moduleConfig-config_sitename"]]
         }
 

data-raw/debugging_info.R

 port = 3838
-utils_path = system.file("demo_data/utilities",
-                         package = "DQAstats")
+output_dir = "output/"
+
+## debugging the MIRACUM stuff:
+## ↓ ↓ ↓ ↓ ↓ ↓ ↓ ↓ ↓ ↓ ↓ ↓
+utils_path = DQAstats::clean_path_name(system.file("application/_utilities",
+                                                   package = "miRacumDQA"))
 mdr_filename = "mdr.csv"
 config_file = system.file("application/_settings/demo_settings_INTERNAL.yml",
                           package = "DQAgui")
+##	↑	↑	↑	↑	↑	↑	↑	↑	↑	↑	↑
+
+
+## debugging testdata:
+## ↓ ↓ ↓ ↓ ↓ ↓ ↓ ↓ ↓ ↓ ↓ ↓
+# utils_path = system.file("demo_data/utilities",
+#                          package = "DQAstats")
+# mdr_filename = "mdr_example_data.csv"
+# config_file = system.file("demo_data/utilities/settings/demo_settings.yml",
+#                           package = "DQAstats")
+##	↑	↑	↑	↑	↑	↑	↑	↑	↑	↑	↑
 
 
-# debugging
 launch_app(
   port = port,
-  utils_path = DQAstats::clean_path_name(system.file("application/_utilities",
-                                                     package = "miRacumDQA")),
+  utils_path = utils_path,
   mdr_filename = mdr_filename,
   config_file = config_file
 )
-