dont pass to qto_div or qto_callout

collapse and sep aren't passed to div or callout
ElianHugh · Dec 22, 2023 · ce5ef81 · ce5ef81
1 parent 2d11d2e
commit ce5ef81
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 3 deletions.
diff --git a/R/map.R b/R/map.R
@@ -1,6 +1,8 @@
 partial_qto_func <- function(f, collapse, sep) {
-    function(...) {
-        f(..., collapse = collapse, sep = sep)
+    if (identical(f, qto_callout) || identical(f, qto_div)) {
+        function(...) f(...)
+    } else {
+        function(...) f(..., collapse = collapse, sep = sep)
     }
 }
 

diff --git a/tests/testthat/test_map.R b/tests/testthat/test_map.R
@@ -39,4 +39,3 @@ test_that("pmap_qto works", {
     expect_true(check_types(qto_list))
     expect_snapshot(qto_list)
 })
-