docs: improve on error message

insightsengineering · Oct 19, 2023 · 13e2325 · 13e2325
1 parent 2f0ffe4
commit 13e2325
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/JoinKeys.R b/R/JoinKeys.R
@@ -491,7 +491,7 @@ join_key <- function(dataset_1, dataset_2 = NULL, keys) {
 primary_key <- function(dataset_1, keys) {
   if (checkmate::test_character(keys) &&
     !checkmate::test_names(names(keys), type = "unnamed")) {
-    stop("Primary keys must match exactly: keys = c('A' = 'B') are not allowed")
+    stop("Primary keys parameter must be a unamed character vector: keys = c('A' = 'A') are not allowed")
   }
   join_key(dataset_1 = dataset_1, dataset_2 = dataset_1, keys = keys)
 }