exclude bookmark values - thanks @Polkas

insightsengineering · Mar 26, 2024 · 0cc4df5 · 0cc4df5
1 parent 28bb1a7
commit 0cc4df5
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 1 deletion.
diff --git a/R/AddCardModule.R b/R/AddCardModule.R
@@ -91,6 +91,7 @@ add_card_button_srv <- function(id, reporter, card_fun) {
   shiny::moduleServer(
     id,
     function(input, output, session) {
+      setBookmarkExclude(c("add_report_card_button", "add_card_ok"))
       ns <- session$ns
       add_modal <- function() {
         shiny::modalDialog(

diff --git a/R/DownloadModule.R b/R/DownloadModule.R
@@ -77,7 +77,7 @@ download_report_button_srv <- function(id,
     id,
     function(input, output, session) {
       ns <- session$ns
-
+      shiny::setBookmarkExclude(c("download_button"))
       download_modal <- function() {
         nr_cards <- length(reporter$get_cards())
         downb <- shiny::tags$a(

diff --git a/R/Previewer.R b/R/Previewer.R
@@ -81,6 +81,7 @@ reporter_previewer_srv <- function(id,
 
   shiny::moduleServer(id, function(input, output, session) {
     ns <- session$ns
+    shiny::setBookmarkExclude(c("resetButtonPreviewer", "download_data_prev"))
 
     session$onBookmark(function(state) {
       state$values$report_cards <- reporter$get_cards()