diff options
| -rw-r--r-- | gnu/home/services/symlink-manager.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/home/services/symlink-manager.scm b/gnu/home/services/symlink-manager.scm index 560e03a839..d7b22d7fba 100644 --- a/gnu/home/services/symlink-manager.scm +++ b/gnu/home/services/symlink-manager.scm @@ -106,7 +106,8 @@ subdirectory from XDG_CONFIG_HOME to generate a target path." (mkdir-p backup-directory) (format #t (G_ "Backing up ~a...") (target-file file)) (mkdir-p (dirname backup)) - (rename-file (target-file file) backup) + (copy-file (target-file file) backup) + (delete-file (target-file file)) (display (G_ " done\n"))) (define (cleanup-symlinks home-generation) |