use tempdir to create directory for the template

carpentries · Jan 27, 2025 · c44ebb3 · c44ebb3
1 parent 7a16c37
commit c44ebb3
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/establish-template.R b/establish-template.R
@@ -34,8 +34,7 @@ if (dir_exists(lesson)) {
 }
 
 cli::cli_alert_info("creating a new sandpaper lesson")
-tmp <- tempfile()
-tmpout <- file.path(tmp, "workbench-template-rmd")
+tmpout <- file.path(tempdir(), "workbench-template-rmd")
 gert::git_clone("https://github.com/carpentries/workbench-template-rmd", tmpout)
 fs::dir_copy(tmpout, lesson)
 cli::cli_alert_info("Updating workflows")