even simpler

jangorecki · Oct 17, 2024 · 12a95bc · 12a95bc
1 parent 51a9dc1
commit 12a95bc
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/pkgup/vignettes.Rmd b/pkgup/vignettes.Rmd
@@ -6,7 +6,7 @@ if (tail(strsplit(getwd(), "/", fixed=TRUE)[[1L]], 1L) == "docs") {
 }
 invisible(file.copy("../vignettes", ".", recursive=TRUE))
 rmd = list.files("./vignettes", "*.Rmd", full.names=TRUE)
-html = sapply(strsplit(html, ".", fixed=TRUE), function(f) paste(collapse=".", c(tail(f, -1L), "html"))
+html = paste0(substr(rmd, 1L, nchar(rmd)-3L), "html")
 if (!length(rmd)) {
     cat("no vignettes\n")
 } else {