* 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