From aa0d11918d9ffe1920bc90a9e0e5238eed40d336 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Andr=C3=A9=20Ver=C3=ADssimo?=
 <211358+averissimo@users.noreply.github.com>
Date: Mon, 4 Nov 2024 20:40:35 +0000
Subject: [PATCH] fix: remove extra parenthesis

---
 R/dummy_functions.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/dummy_functions.R b/R/dummy_functions.R
index 1068c73477..201ca6df8d 100644
--- a/R/dummy_functions.R
+++ b/R/dummy_functions.R
@@ -20,7 +20,7 @@ example_module <- function(label = "example teal module", datanames = "all", tra
     server = function(id, data) {
       checkmate::assert_class(isolate(data()), "teal_data")
       moduleServer(id, function(input, output, session) {
-        datanames_rv <- reactive(names((req(data()))))
+        datanames_rv <- reactive(names(req(data())))
         observeEvent(datanames_rv(), {
           selected <- input$dataname
           if (identical(selected, "")) {