Update tests/testthat/test-merge_expression_srv.R

Co-authored-by: Dawid Kałędkowski <[email protected]> Signed-off-by: Vedha Viyash <[email protected]>
insightsengineering · Nov 7, 2023 · f258ae1 · f258ae1
1 parent 0d5d063
commit f258ae1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/testthat/test-merge_expression_srv.R b/tests/testthat/test-merge_expression_srv.R
@@ -20,7 +20,7 @@ adsl_data_extract_srv_output <-
     dataname = "ADSL",
     filters = NULL,
     select = "AGE",
-    keys = join_keys[["ADSL", "ADSL"]],
+    keys = join_keys[["ADSL"]][["ADSL"]],
     reshape = FALSE,
     internal_id = "adsl_extract"
   )