From 0cc4df5a960225985c5470a579e0c2d62c66afe2 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Dawid=20Ka=C5=82=C4=99dkowski?=
 <dawid.kaledkowski@gmail.com>
Date: Tue, 26 Mar 2024 07:58:33 +0100
Subject: [PATCH] exclude bookmark values - thanks @Polkas

---
 R/AddCardModule.R  | 1 +
 R/DownloadModule.R | 2 +-
 R/Previewer.R      | 1 +
 3 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/R/AddCardModule.R b/R/AddCardModule.R
index d5646d55..5adf32c1 100644
--- 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
index c0e8f3b3..3a4cbf12 100644
--- 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
index cca97036..916e2dc6 100644
--- 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()