use paste instead of deparse1

dcomtois · Sep 13, 2022 · f6b9db5 · f6b9db5
1 parent f7b22b7
commit f6b9db5
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -39,7 +39,7 @@ Suggests:
   magrittr,
   rmarkdown,
   rstudioapi
-Depends: R (>= 4.0.0)
+Depends: R (>= 2.10)
 VignetteBuilder: knitr
 LazyData: true
 License: GPL-2

diff --git a/R/parse_args.R b/R/parse_args.R
@@ -595,7 +595,7 @@ parse_args <- function(sys_calls,
         upd_output("var_name",  NA_character_)
         upd_output("var_label", NA_character_)
       } else {
-        parse_data_str(deparse1(calls$fun[[var]]))
+        parse_data_str(paste(deparse(calls$fun[[var]]), collapse = " "))
       }
     } else if (is.atomic(obj2)) {
       if (length(calls$fun[[var]]) == 1) {