diff --git a/cran-comments.md b/cran-comments.md index 38adff4..0edbd89 100644 --- a/cran-comments.md +++ b/cran-comments.md @@ -9,3 +9,7 @@ R CMD check done via `devtools::check()`, resulting in 0 errors, 0 warnings, 0 n ## Downstream dependencies This is a simple template package with no downstream dependencies to note. + +## Feedback to CRAN upon initial rejection + +That was me clumsily adding new templates while my tests were hard-connected to elements in a vector, by number. That's my bad. diff --git a/docs/pkgdown.yml b/docs/pkgdown.yml index 9e16fb1..bef2488 100644 --- a/docs/pkgdown.yml +++ b/docs/pkgdown.yml @@ -2,7 +2,7 @@ pandoc: 3.1.1 pkgdown: 2.0.7 pkgdown_sha: ~ articles: {} -last_built: 2024-01-26T15:22Z +last_built: 2024-01-26T15:48Z urls: reference: http://svmiller.com/reference article: http://svmiller.com/articles diff --git a/tests/testthat/test-exists.R b/tests/testthat/test-exists.R index ceddc13..cb1947c 100644 --- a/tests/testthat/test-exists.R +++ b/tests/testthat/test-exists.R @@ -3,18 +3,18 @@ context("Does template exist") #templates_all <- list.files("inst/rmarkdown/templates") templates_all <- list.files(system.file("rmarkdown", "templates", package="stevetemplates")) -for (i in templates_all[c(1:6,8:11)]) { +for (i in templates_all[which(templates_all != "html_article" & templates_all != "word")]) { expect_true(file.exists(system.file("rmarkdown", "templates", i, "resources", "template.tex", package = "stevetemplates"))) } -for (i in templates_all[c(7)]) { +for (i in templates_all[which(templates_all == "html_article")]) { expect_true(file.exists(system.file("rmarkdown", "templates", i, "resources", "template.html", package = "stevetemplates"))) } -for (i in templates_all[c(12)]) { +for (i in templates_all[which(templates_all == "word")]) { expect_true(file.exists(system.file("rmarkdown", "templates", i, "resources", "template.docx", package = "stevetemplates"))) }