explicitly ignore empty arguments (#5604)

teunbrand · thomasp85 · commit 3126fc0744ec · 2024-02-23T11:07:07.000+01:00
diff --git a/R/utilities.R b/R/utilities.R
@@ -320,7 +320,7 @@ find_args <- function(...) {
   vals <- mget(args, envir = env)
   vals <- vals[!vapply(vals, is_missing_arg, logical(1))]
 
-  modify_list(vals, list2(..., `...` = NULL))
+  modify_list(vals, dots_list(..., `...` = NULL, .ignore_empty = "all"))
 }
 
 # Used in annotations to ensure printed even when no

Original file line number	Diff line number	Diff line change
`@@ -320,7 +320,7 @@ find_args <- function(...) {`
`320`	`320`	`vals <- mget(args, envir = env)`
`321`	`321`	`vals <- vals[!vapply(vals, is_missing_arg, logical(1))]`
`322`	`322`
`323`		- modify_list(vals, list2(..., `...` = NULL))
	`323`	+ modify_list(vals, dots_list(..., `...` = NULL, .ignore_empty = "all"))
`324`	`324`	`}`
`325`	`325`
`326`	`326`	`# Used in annotations to ensure printed even when no`