Fix: Correcting ids to file_type button and text (#73)

dfe-analytical-services · Jan 7, 2025 · e2e4f9a · e2e4f9a
1 parent bb117d6
commit e2e4f9a
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/lait_modules/mod_region_table.R b/R/lait_modules/mod_region_table.R
@@ -310,14 +310,14 @@ RegionLA_TableServer <- function(id, app_inputs, bds_metrics, stat_n_geog) {
     # Download ----------------------------------------------------------------
     # File download text - calculates file size
     ns <- NS(id)
-    output$file_type <- shiny::renderUI({
+    output$download_file_txt <- shiny::renderUI({
       file_type_input_btn(ns("file_type"), region_la_table_raw())
     })
 
     # Download dataset
     Download_DataServer(
       "la_download",
-      reactive(input$download_file_txt),
+      reactive(input$file_type),
       reactive(region_la_table_raw()),
       reactive(c(app_inputs$la(), app_inputs$indicator(), "LA-Regional-Level"))
     )