Bugfix & tests for fetch_survey() when include_* = NA, closes #272 (#277

) * Bugfix & tests for fetch_survey() when include_* = NA * Update NEWS Co-authored-by: Julia Silge <[email protected]>
ropensci · Aug 18, 2022 · 107738a · 107738a
1 parent e05f46f
commit 107738a
Show file tree

Hide file tree

Showing 4 changed files with 834 additions and 2 deletions.
diff --git a/NEWS.md b/NEWS.md
@@ -2,6 +2,8 @@
 
 - Refactored code for checking arguments and errors, thanks to @jmobrien (#263)
 
+- Fixed bug in `fetch_survey()` for `include_* = NA`, thanks to @jmobrien (#277)
+
 # qualtRics 3.1.6
 
 - Add `fetch_distribution_history()` and `list_distribution_links()` for more handling of distribution data, thanks to @chrisumphlett and @dsen6644 (#221, #239)

diff --git a/R/utils.R b/R/utils.R
@@ -175,8 +175,9 @@ create_raw_payload <-
 
     # Make list of params, dropping NULL's:
     params <-
-      purrr::compact(
-        list(...)
+      purrr::discard(
+        list(...),
+        is.null
         )
 
     # Selectively mark length-1 parameters for unboxing, following the API scheme: