From c83f57ff3104acc64a947352636a3c0d4600ee2b Mon Sep 17 00:00:00 2001 From: Moohan Date: Wed, 13 Nov 2024 20:57:56 +0000 Subject: [PATCH] Style code (GHA) --- R/parse_row_filters.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/parse_row_filters.R b/R/parse_row_filters.R index f17e177..1749629 100644 --- a/R/parse_row_filters.R +++ b/R/parse_row_filters.R @@ -12,14 +12,14 @@ parse_row_filters <- function(row_filters) { if (!is.list(row_filters) && !is.character(row_filters)) { cli::cli_abort("{.arg row_filters} must be a named {.cls list} or a named {.cls character} vector, not a {.cls {class(row_filters)}}.") } - + # If it's a list, ensure it's depth 1 and elements are named if (is.list(row_filters)) { if (any(lengths(row_filters) > 1) || any(names(row_filters) == "")) { cli::cli_abort("{.arg row_filters} must be a list of depth 1 with named elements.") } } - + # If it's a character vector, ensure it's named if (is.character(row_filters) && any(names(row_filters) == "")) { cli::cli_abort("{.arg row_filters} must be a named character vector.")