From 3240b4856ea97699a5455001d563d43365a2c158 Mon Sep 17 00:00:00 2001 From: Yunuuuu Date: Sun, 12 Jan 2025 08:22:26 +0800 Subject: [PATCH] fix error for reorder missing prefix dot --- R/pair-links.R | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/R/pair-links.R b/R/pair-links.R index 5421189a..08830e23 100644 --- a/R/pair-links.R +++ b/R/pair-links.R @@ -57,14 +57,14 @@ #' x #' @export pair_links <- function(..., .handle_missing = "error", .reorder = NULL) { - handle_missing <- arg_match0(.handle_missing, c("error", "remove")) - if (!is.null(reorder)) { - reorder <- arg_match0(reorder, c("hand1", "hand2")) + .handle_missing <- arg_match0(.handle_missing, c("error", "remove")) + if (!is.null(.reorder)) { + .reorder <- arg_match0(.reorder, c("hand1", "hand2")) } pairs <- rlang::dots_list(..., .ignore_empty = "all", .named = NULL) new_pair_links( lapply(pairs, as_pair_link, x_arg = "...", call = current_call()), - handle_missing = handle_missing, reorder = reorder + handle_missing = .handle_missing, reorder = .reorder ) }