diff options
| -rw-r--r-- | guix/scripts/environment.scm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/guix/scripts/environment.scm b/guix/scripts/environment.scm index 7103fdaf202..3c669067935 100644 --- a/guix/scripts/environment.scm +++ b/guix/scripts/environment.scm @@ -989,9 +989,8 @@ otherwise, return 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))) |
