Do not use R's RNG to generate tree id

Closes #386.
r-lib · Apr 2, 2024 · c3ab227 · MichaelChirico · Apr 3, 2024 · c3ab227
1 parent 95ba3aa
commit c3ab227
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/R/utils.R b/R/utils.R
@@ -194,8 +194,7 @@ get_tool <- function(prog) {
 
 get_id <- function() {
   paste0(
-    "PS",
-    paste(sample(c(LETTERS, 0:9), 10, replace = TRUE), collapse = ""),
+    basename(tempfile("PS")),
     "_", as.integer(asNamespace("base")$.Internal(Sys.time()))
   )
 }