From ed72a9424950622f008072b97f0f119be0ab4320 Mon Sep 17 00:00:00 2001
From: Nicolas Bennett <3158446+nbenn@users.noreply.github.com>
Date: Mon, 3 Feb 2025 11:04:54 +0100
Subject: [PATCH] fix restore

---
 R/select.R | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/R/select.R b/R/select.R
index 83ec34a..dd1bf1d 100644
--- a/R/select.R
+++ b/R/select.R
@@ -18,10 +18,13 @@ new_select_block <- function(columns = character(), ...) {
           sels <- reactiveVal(columns)
           cols <- reactive(colnames(data()))
 
+          observeEvent(
+            input$columns,
+            sels(intersect(input$columns, cols()))
+          )
+
           observe(
             {
-              sels(intersect(input$columns, cols()))
-
               updateSelectInput(
                 session,
                 inputId = "columns",