From b5b93046fb6b774ef5dfb2747444e7a9a5fa3de3 Mon Sep 17 00:00:00 2001
From: "Gregory R. Warnes" <greg@warnes.net>
Date: Wed, 26 Apr 2023 20:27:15 -0400
Subject: [PATCH] Resolves #101, #116

---
 R/webshot.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/webshot.R b/R/webshot.R
index ac467f1..39d2389 100644
--- a/R/webshot.R
+++ b/R/webshot.R
@@ -220,7 +220,7 @@ webshot <- function(
   # them into a character vector with the desired format.
   argToVec <- function(arg) {
     vapply(arg, FUN.VALUE = character(1), function(x) {
-      if (is.null(x) || is.na(x)) NA_character_
+      if (any(is.null(x)) || any(is.na(x))) NA_character_
       else paste(x, collapse = ",")
     })
   }