TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

home-services: symlink-manager: Properly handle 1st generation case.

Browse source 
Signed-off-by: Oleg Pykhalov <go.wigust@gmail.com>
This commit is contained in:
Andrew Tropin 2021-08-30 12:23:48 +03:00 committed by Oleg Pykhalov
parent 833a78b16c
commit 990e1e0af5
No known key found for this signature in database
GPG key ID: 167F8EA5001AFA9C
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
gnu/home-services/symlink-manager.scm
View file

@ -102,7 +102,7 @@ (define ((file-tree-traverse preordering) node)
(number->string (current-time)) (number->string (current-time))
"-guix-home-legacy-configs-backup")) "-guix-home-legacy-configs-backup"))
(old-tree (if (file-exists? old-home) (old-tree (if old-home
((simplify-file-tree "") ((simplify-file-tree "")
(file-system-tree (file-system-tree
(string-append old-home "/files/."))) (string-append old-home "/files/.")))