test: Running examples should be with local = FALSE

Otherwise variables produced by the example are not available after. Refs #52

test: Running examples should be with local = FALSE
Otherwise variables produced by the example are not available after. Refs #52
17fb0784 · Dorchies David · f41246f6 · 17fb0784
Commit 17fb0784 authored 5 years ago by Dorchies David
Hide whitespace changes
Inline Side-by-side

Showing

with 1 addition and 1 deletion
+1 -1
--- a/tests/testthat/helper_vignettes.R
+++ b/tests/testthat/helper_vignettes.R
@@ -50,7 +50,7 @@ RunRmdChunks <-  function(fileRmd,
  sTxt = gsub("trace\\s?=\\s?[0-9]+", "trace = 0", sTxt)
  # Add parameters to example calls
  exLines = grep("^example\\(.*\\)", sTxt)
-  sTxt[exLines] = paste0(substr(sTxt[exLines], 1, nchar(sTxt[exLines]) - 1), ", local = TRUE, echo = FALSE, verbose = FALSE, ask = FALSE)")
+  sTxt[exLines] = paste0(substr(sTxt[exLines], 1, nchar(sTxt[exLines]) - 1), ", echo = FALSE, verbose = FALSE, ask = FALSE)")
  # Remove question "Hit <Return> to see next plot"
  sTxt = c("par(ask=F)", sTxt)
  # Write the transformed script