* guix/scripts/environment.scm (override-user-mappings): Use inherit.

Change-Id: Iadd9b838f6442a8080998ed7e07414db562068bf
---
 guix/scripts/environment.scm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/guix/scripts/environment.scm b/guix/scripts/environment.scm
index 7103fdaf20..3c66906793 100644
--- a/guix/scripts/environment.scm
+++ b/guix/scripts/environment.scm
@@ -989,9 +989,8 @@ (define (override-user-mappings user home mappings)
              (let ((target (file-system-mapping-target mapping)))
                (if (string-prefix? home target)
                    (file-system-mapping
-                    (source    (file-system-mapping-source mapping))
-                    (target    (override-user-dir user home target))
-                    (writable? (file-system-mapping-writable? mapping)))
+                    (inherit mapping)
+                    (target (override-user-dir user home target)))
                    mapping)))
            mappings)))
 
-- 
2.49.0




Reply via email to