feat: improve ux by warning user that a locked button was clicked

bigomics · Mar 29, 2024 · c5889cb · c5889cb
1 parent 62a8b03
commit c5889cb
Showing 1 changed file with 10 additions and 0 deletions.
diff --git a/components/board.upload/R/upload_server.R b/components/board.upload/R/upload_server.R
@@ -570,6 +570,16 @@ UploadBoard <- function(id,
       wizardR::reset("upload_wizard")
     })
 
+    # warn user when locked button is clicked (UX)
+    observeEvent(
+      input$upload_wizard_locked, {
+        shinyalert::shinyalert(
+          title = "Upload wizard locked",
+          text = "Please complete the current step before proceeding.",
+          type = "warning"
+        )
+      })
+
     # wizard lock/unlock logic
 
     # lock/unlock wizard for counts.csv