Slå på silent på rmarkdown::render (#194)

Ble veldig mye støy under testing, blant annet
Rapporteket · Dec 16, 2024 · e16dae1 · e16dae1
1 parent 6786abb
commit e16dae1
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 4 deletions.
diff --git a/R/renderRmd.R b/R/renderRmd.R
@@ -72,7 +72,8 @@ renderRmd <- function(sourceFile, outputType = "html", logoFile = NULL,
     output_file = tempfile(pattern = ""),
     clean = TRUE,
     params = params,
-    envir = new.env()
+    envir = new.env(),
+    quiet = TRUE
   )
 
   if (outputType == "html_fragment") {

diff --git a/tests/testthat/test-miscellaneous-functions.R b/tests/testthat/test-miscellaneous-functions.R
@@ -32,14 +32,14 @@ file.copy(
 
 # produce a pop-up text...
 test_that("an html doc regarding 'how we deal with...' can be provided", {
-  expect_output(howWeDealWithPersonalData(session = list()), "")
+  expect_silent(howWeDealWithPersonalData(session = list()))
 })
 
 test_that("pop-up html can add an installed pacakge to info", {
-  expect_output(howWeDealWithPersonalData(
+  expect_silent(howWeDealWithPersonalData(
     session = list(),
     callerPkg = "base"
-  ), "")
+  ))
 })
 
 test_that("pop-up html provide a warning for a non-existing pacakge", {