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, "")) {