fix bug introduced into box_save()

r-box · Feb 3, 2024 · 735e03d · 735e03d
1 parent d2615f3
commit 735e03d
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/boxr_save_load.R b/R/boxr_save_load.R
@@ -31,8 +31,8 @@
 box_save <- function(..., dir_id = box_getwd(), file_name = ".RData", 
                      description = NULL) {
 
-  temp_file <- withr::local_tempfile(pattern = file_name)
-  
+  temp_file <- fs::path(withr::local_tempdir(), file_name)
+
   save(..., envir = parent.frame(), file = temp_file)
 
   box_ul(dir_id, temp_file, description = description)