typo

openvolley · Jan 20, 2024 · f18f39e · f18f39e
1 parent 50c27ca
commit f18f39e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/cleaning_names.R b/R/cleaning_names.R
@@ -179,7 +179,7 @@ remap_player_names <- function(x,remap) {
         stop("x must be a datavolley object or list of such objects")
     }
     assert_that(is.data.frame(remap))
-    if (!(setequal(names(remap), c("from", "team", "to")) || setequal(names(remap), c("player_id"," player_name")))) {
+    if (!(setequal(names(remap), c("from", "team", "to")) || setequal(names(remap), c("player_id", "player_name")))) {
         stop("remap data.frame must either have column names \"team\", \"from\", \"to\" OR \"player_id\", \"player_name\"")
     }
     for (k in seq_len(ncol(remap))) remap[[k]] <- as.character(remap[[k]]) ## enforce all cols to be character