File tree Expand file tree Collapse file tree 2 files changed +5
-6
lines changed Expand file tree Collapse file tree 2 files changed +5
-6
lines changed Original file line number Diff line number Diff line change 5252# ' advanced usage and useful for CLI arguments which are not yet mirrored in a
5353# ' dedicated parameter of this \R function. See `quarto render --help` for options.
5454# ' @param pandoc_args Additional command line arguments to pass on to Pandoc.
55- # ' @param libpaths A character vector of library paths to use for the R session run by Quarto.
56- # ' If `NULL`, no library paths will be pass to quarto subprocess and defaults R one will be used.
57- # ' Setting `options(quarto.use_libpaths = FALSE)` will disable this behavior and
55+ # ' @param libpaths A character vector of library paths to use for the R session run by Quarto.
56+ # ' If `NULL`, no library paths will be pass to quarto subprocess and defaults R one will be used.
57+ # ' Setting `options(quarto.use_libpaths = FALSE)` will disable this behavior and
5858# ' never pass library paths to quarto subprocess.
5959# ' @param as_job Render as an RStudio background job. Default is `"auto"`,
6060# ' which will render individual documents normally and projects as
Original file line number Diff line number Diff line change @@ -127,7 +127,7 @@ test_that("quarto sees same libpaths as main process", {
127127 skip_if_no_quarto()
128128 skip_on_cran()
129129 qmd <- local_qmd_file(c(" ```{r}" , " #| echo: false" , " .libPaths()" , " ```" ))
130- tmp_lib <- withr :: local_tempdir(" tmp_libpath" )
130+ tmp_lib <- withr :: local_tempdir(" tmp_libpath" )
131131 withr :: local_libpaths(tmp_lib , action = " prefix" )
132132 withr :: local_dir(dirname(qmd ))
133133 out <- " out.md"
@@ -136,14 +136,13 @@ test_that("quarto sees same libpaths as main process", {
136136 expect_match(out , basename(tmp_lib ), all = FALSE , fixed = TRUE )
137137 # Opting-out globally
138138 withr :: with_options(
139- list (quarto.use_libpaths = FALSE ),
139+ list (quarto.use_libpaths = FALSE ),
140140 out <- .render_and_read(qmd , output_format = " gfm" )
141141 )
142142 expect_no_match(out , basename(tmp_lib ), fixed = TRUE )
143143 # Opting-out at command
144144 out <- .render_and_read(qmd , output_format = " gfm" , libpaths = NULL )
145145 expect_no_match(out , basename(tmp_lib ), fixed = TRUE )
146-
147146})
148147
149148test_that(" quarto_available()" , {
You can’t perform that action at this time.
0 commit comments