summaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
Diffstat (limited to 'gnu')
-rw-r--r--gnu/build/activation.scm2
1 files changed, 2 insertions, 0 deletions
diff --git a/gnu/build/activation.scm b/gnu/build/activation.scm
index 53844c0990e..dbe35f41b88 100644
--- a/gnu/build/activation.scm
+++ b/gnu/build/activation.scm
@@ -497,6 +497,8 @@ improvement."
497 (mkdir-p "/run") 497 (mkdir-p "/run")
498 ;; Atomically make SYSTEM current. 498 ;; Atomically make SYSTEM current.
499 (let ((new (string-append %current-system ".new"))) 499 (let ((new (string-append %current-system ".new")))
500 (when (file-exists? new)
501 (delete-file new))
500 (symlink system new) 502 (symlink system new)
501 (rename-file new %current-system))) 503 (rename-file new %current-system)))
502 504