Merge branch 'feat/fix-issue-#74' into dev

Claudius-Appel · May 17, 2024 · 7db8a4b · 7db8a4b
2 parents 7597784 + 390ab1d
commit 7db8a4b
Show file tree

Hide file tree

Showing 46 changed files with 54 additions and 54 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: duflor.gui
 Title: Frontend for duflor-package
-Version: 0.0.1.9052
+Version: 0.0.1.9053
 Author: Claudius Appel
 Authors@R: c(
     person("Claudius", "Appel", email =   "claudius.appel@freenet.de" , role = c("aut", "cre"))

diff --git a/R/app.R b/R/app.R
@@ -227,10 +227,10 @@ duflor_gui <- function() {
             folder_path = NA
         )
         DEBUGKEYS <- reactiveValues(
-            force.prints = FALSE,
-            force.log = FALSE,
+            # if you want to have functionality blocked by the dev-console, add
+            # the key here with its default value.
+            # Next, update the logic within the function `dev_key_handler`
             set.author = TRUE
-
         )
         FLAGS <- reactiveValues(
             analyse_single_image = FALSE,

diff --git a/R/dev_key_handler.R b/R/dev_key_handler.R
@@ -30,20 +30,20 @@
 #'
 dev_key_handler <- function(input, DATA, DEBUGKEYS, session, use_logical_cores) {
     # add valid keys here
-    # private, undocumentable keys must be prefixed with 3 `-`
-    Arr <- str_split("--force-prints,--force-log,---set-author,---set-cores,-h",",")
-    # then add them to the reactive 'DEBUGKEYS' so that it can be accessed elsewhere as well.
+    keys_array <- str_split("---set-cores,-h",",")
+    # then add them to the reactive 'DEBUGKEYS' (see 'app.R', search for 'DEBUGKEYS <- reactiveValues(')
+    # so that it can be accessed elsewhere as well.
     Keys <- unlist(str_split(input$dev_pass,","))
     for (each in Keys) {
         each_ <- str_remove_all(each,"=(1|0|FALSE|TRUE)")
         each_ <- str_remove_all(each,"=(F|T)")
         each__ <- str_remove_all(each,"=.*")
-        if ((each %in% Arr[[1]]) || (each_ %in% Arr[[1]]) || (each__ %in% Arr[[1]])) { # BUG: this bool returns an array if `each` is a char-vector itself.
+        if ((each %in% keys_array[[1]]) || (each_ %in% keys_array[[1]]) || (each__ %in% keys_array[[1]])) { # BUG: this bool returns an array if `each` is a char-vector itself.
             if (each=="-h") {
                 showNotification(
                     ui = str_c(
                         "Available dev Keys (see documentation): ",
-                        str_flatten_comma(Arr[[1]][!str_count(Arr[[1]], "---")])
+                        str_flatten_comma(keys_array[[1]])
                     ),
                     duration = DATA$notification_duration,
                     type = "message"

diff --git a/docs/404.html b/docs/404.html
diff --git a/docs/LICENSE-text.html b/docs/LICENSE-text.html
diff --git a/docs/LICENSE.html b/docs/LICENSE.html
diff --git a/docs/articles/general-user-manual.html b/docs/articles/general-user-manual.html
diff --git a/docs/articles/identifier-cropping.html b/docs/articles/identifier-cropping.html
diff --git a/docs/articles/image-cropping.html b/docs/articles/image-cropping.html
diff --git a/docs/articles/index.html b/docs/articles/index.html
diff --git a/docs/articles/modifying-hsv-bounds.html b/docs/articles/modifying-hsv-bounds.html
diff --git a/docs/articles/optimising-speed.html b/docs/articles/optimising-speed.html
diff --git a/docs/articles/parallelisation.html b/docs/articles/parallelisation.html
diff --git a/docs/articles/raising-issues.html b/docs/articles/raising-issues.html
diff --git a/docs/articles/saving-and-restoring-application-states.html b/docs/articles/saving-and-restoring-application-states.html
diff --git a/docs/authors.html b/docs/authors.html
diff --git a/docs/index.html b/docs/index.html
diff --git a/docs/pkgdown.yml b/docs/pkgdown.yml
@@ -10,7 +10,7 @@ articles:
   parallelisation: parallelisation.html
   raising-issues: raising-issues.html
   saving-and-restoring-application-states: saving-and-restoring-application-states.html
-last_built: 2024-05-17T17:55Z
+last_built: 2024-05-17T20:05Z
 urls:
   reference: https://Claudius-Appel.github.io/duflor.gui/reference
   article: https://Claudius-Appel.github.io/duflor.gui/articles

diff --git a/docs/reference/convert_pixels_to_area_gui.html b/docs/reference/convert_pixels_to_area_gui.html
diff --git a/docs/reference/dev_key_handler.html b/docs/reference/dev_key_handler.html
diff --git a/docs/reference/duflor_gui.html b/docs/reference/duflor_gui.html
diff --git a/docs/reference/execute_analysis.html b/docs/reference/execute_analysis.html
diff --git a/docs/reference/execute_multiple.html b/docs/reference/execute_multiple.html
diff --git a/docs/reference/execute_single.html b/docs/reference/execute_single.html
diff --git a/docs/reference/get_KPI_plot.html b/docs/reference/get_KPI_plot.html
diff --git a/docs/reference/get_group.html b/docs/reference/get_group.html
diff --git a/docs/reference/get_image_dimensions.html b/docs/reference/get_image_dimensions.html
diff --git a/docs/reference/index.html b/docs/reference/index.html
diff --git a/docs/reference/key_handle_cores.html b/docs/reference/key_handle_cores.html
diff --git a/docs/reference/limit_identifier_coordinates.html b/docs/reference/limit_identifier_coordinates.html
diff --git a/docs/reference/limit_to_range.html b/docs/reference/limit_to_range.html
diff --git a/docs/reference/open_parallelPanel_event.html b/docs/reference/open_parallelPanel_event.html
diff --git a/docs/reference/prepare_resultsObject.html b/docs/reference/prepare_resultsObject.html
diff --git a/docs/reference/render_selected_mask.html b/docs/reference/render_selected_mask.html
diff --git a/docs/reference/restore_state.html b/docs/reference/restore_state.html