wigust pushed a commit to branch wip-guix-home
in repository guix.
commit e593e08e096eafd5b2c8d07e2a0c3831c18e141b
Author: Andrew Tropin <[email protected]>
AuthorDate: Mon Aug 30 12:23:48 2021 +0300
home-services: symlink-manager: Properly handle 1st generation case.
Signed-off-by: Oleg Pykhalov <[email protected]>
---
gnu/home-services/symlink-manager.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/gnu/home-services/symlink-manager.scm
b/gnu/home-services/symlink-manager.scm
index dc409d2..11f5d50 100644
--- a/gnu/home-services/symlink-manager.scm
+++ b/gnu/home-services/symlink-manager.scm
@@ -102,7 +102,7 @@ appear only after all nested items already listed."
(number->string (current-time))
"-guix-home-legacy-configs-backup"))
- (old-tree (if (file-exists? old-home)
+ (old-tree (if old-home
((simplify-file-tree "")
(file-system-tree
(string-append old-home "/files/.")))