From ab2dedb66f72affadcbb78163a532c7e6ba1ecc9 Mon Sep 17 00:00:00 2001
From: Andreas Gammelgaard Damsbo <andreas@gdamsbo.dk>
Date: Mon, 9 Dec 2024 14:06:47 +0100
Subject: [PATCH] include a little more metadata. module works with teal as
 well

---
 R/modules.R | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/R/modules.R b/R/modules.R
index 340c880..8da7b6e 100644
--- a/R/modules.R
+++ b/R/modules.R
@@ -254,10 +254,10 @@ m_redcap_readServer <- function(id, output.format = c("df", "teal", "list")) {
 
       if (output.format == "list") {
         out <- list(
-            data = shiny::reactive(redcap_data)
-            # meta = dd()[["dd"]],
-            # name = name,
-            # filter = input$filter
+            data = shiny::reactive(redcap_data),
+            meta = dd()[["dd"]],
+            name = name,
+            filter = input$filter
           )
 
       } else {