diff --git a/R/readdesign.R b/R/readdesign.R
index 12ae50c78aa0016ef08f13f439396b9e17470689..3886870a327ed72c505a24d4b58b5ee9cc5b5617 100644
--- a/R/readdesign.R
+++ b/R/readdesign.R
@@ -71,7 +71,7 @@ as.data.frame(designf)
     read_test() %>%
       tibble::rownames_to_column(var = "row_id") %>%
       dplyr::filter(!grepl("no.choice", row_id)) %>% # Exclude no.choice rows
-      dplyr::select(!contains("cte")) %>% # Drop unnecessary columns
+      dplyr::select(!dplyr::contains("cte")) %>% # Drop unnecessary columns
       dplyr::mutate(
         # Extract Choice.situation as number after 'set'
         Choice.situation = as.integer(sub("^set(\\d+).*", "\\1", row_id)),