Fix null input parsing

numbats · May 29, 2024 · 7057628 · 7057628
1 parent b70a676
commit 7057628
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 1 deletion.
diff --git a/.gitignore b/.gitignore
@@ -50,4 +50,5 @@ rsconnect/
 .Rproj.user
 docs
 
-.Rprofile
+.Rprofile
+inst/doc
diff --git a/R/util.R b/R/util.R
@@ -1,7 +1,13 @@
 restify_vector <- function(input, name = NULL) {
+    if (is.null(input)) {
+        return(NULL)
+    }
     if (is.null(name)) {
         name <- deparse(substitute(input))
     }
+    input <- sapply(input, function(s) {
+        gsub(" ", "%20", s)
+    })
     string <- paste0("&", name, "=")
 
     paste0(input, collapse=string)