summary refs log tree commit diff
diff options
context:
space:
mode:
authorAndrew Tropin <andrew@trop.in>2022-03-11 08:43:04 +0300
committerLudovic Courtès <ludo@gnu.org>2022-03-20 19:02:40 +0100
commit9e86e58d6f77297551c96b6a8aae0a4efadd8eac (patch)
tree4d2efc16421f29f0bdb9152fcd0999ba3cb2007d
parent10d865aa921f559562fb543d7796c7a08e17f016 (diff)
downloadguix-9e86e58d6f77297551c96b6a8aae0a4efadd8eac.tar.gz
home: symlink-manager: Use existing home-directory symbol.
* gnu/home/services/symlink-manager.scm (update-symlinks-script): Use
existing home-directory symbol instead of additional getenv call.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
-rw-r--r--gnu/home/services/symlink-manager.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/gnu/home/services/symlink-manager.scm b/gnu/home/services/symlink-manager.scm
index 767b1bdc01..bce5c85b56 100644
--- a/gnu/home/services/symlink-manager.scm
+++ b/gnu/home/services/symlink-manager.scm
@@ -185,7 +185,7 @@
 
          #$%initialize-gettext
 
-         (let* ((home     (string-append (getenv "HOME") "/.guix-home"))
+         (let* ((home     (string-append home-directory "/.guix-home"))
                 (pivot    (string-append home ".new"))
                 (new-home (getenv "GUIX_NEW_HOME"))
                 (old-home (getenv "GUIX_OLD_HOME")))