Merge pull request #29 from mihem/fix_move_file

fix move file
DanChaltiel · Nov 14, 2024 · e10db22 · e10db22
2 parents e10a2c8 + ff2456c
commit e10db22
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/NAMESPACE b/NAMESPACE
@@ -32,6 +32,7 @@ importFrom(dplyr,summarise)
 importFrom(dplyr,transmute)
 importFrom(dplyr,ungroup)
 importFrom(fs,file_exists)
+importFrom(fs,file_move)
 importFrom(fs,path)
 importFrom(fs,path_dir)
 importFrom(fs,path_temp)

diff --git a/R/decision.R b/R/decision.R
@@ -21,6 +21,7 @@
 #' @export
 #' @importFrom cli cli_inform
 #' @importFrom rlang check_installed
+#' @importFrom fs file_move
 import_review = function(source_path="R/",
                          output_path=get_target_dir(),
                          background=getOption("autoimport_background", FALSE)) {
@@ -114,7 +115,7 @@ review_app = function(data_files){
 
     shiny::observeEvent(input$accept, {
       cli_inform(c(">"="Accepting modification of '{.file {old_path[[i()]]}}'"))
-      file.rename(new_path[[i()]], old_path[[i()]])
+      file_move(new_path[[i()]], old_path[[i()]])
       update_cases()
     })
     shiny::observeEvent(input$skip, {