1
0
mirror of https://github.com/msberends/AMR.git synced 2025-07-08 22:41:52 +02:00
This commit is contained in:
2023-02-06 12:38:52 +01:00
parent 9e99e66f01
commit f7dd890b79
6 changed files with 26 additions and 12 deletions

View File

@ -363,7 +363,7 @@ set_ab_names <- function(data, ..., property = "name", language = get_AMR_locale
if (is.data.frame(data)) {
if (tryCatch(length(list(...)) > 0, error = function(e) TRUE)) {
out <- tryCatch(suppressWarnings(c(...)), error = function(e) NULL)
out <- tryCatch(suppressWarnings(unlist(list(...))), error = function(e) NULL)
if (!is.null(out)) {
df <- data[, out, drop = FALSE]
} else {