add litedown mock

Author: ben-schwen

tests/litedown.R

@@ -0,0 +1,15 @@
+if (!suppressPackageStartupMessages(requireNamespace("litedown", quietly = TRUE))) {
+  cat(readLines("litedown.Rout.mock", warn = FALSE), sep = "\n")
+  q("no")
+}
+
+# Load litedown and render the Rmd file
+library(litedown)
+litedown::reactor(comment="# ", print=xfun::record_print)
+invisible(litedown::fuse("litedown.Rmd", output = "litedown.md"))
+
+# Print the rendered markdown content
+cat(readLines("litedown.md"), sep = "\n")
+
+# Clean up
+invisible(file.remove("litedown.md"))

inst/tests/knitr.Rmd tests/litedown.Rmdinst/tests/knitr.Rmd renamed to tests/litedown.Rmd

@@ -1,4 +1,4 @@
-```{r test_id, message=FALSE, results="show", echo=TRUE, warning=FALSE}
+```{r, test_id, message=FALSE, results="show", echo=TRUE, warning=FALSE}
 require(data.table)              # print?
 DT = data.table(x=1:3, y=4:6)    # no
 DT                               # yes