diff options
Diffstat (limited to 'gnu/system')
| -rw-r--r-- | gnu/system/vm.scm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gnu/system/vm.scm b/gnu/system/vm.scm index 4a0d68d2cd0..5791ca4ffaa 100644 --- a/gnu/system/vm.scm +++ b/gnu/system/vm.scm | |||
| @@ -153,8 +153,7 @@ environment with the store shared with the host. MAPPINGS is a list of | |||
| 153 | (remove (lambda (fs) | 153 | (remove (lambda (fs) |
| 154 | (let ((target (file-system-mount-point fs)) | 154 | (let ((target (file-system-mount-point fs)) |
| 155 | (source (file-system-device fs))) | 155 | (source (file-system-device fs))) |
| 156 | (or (string=? target (%store-prefix)) | 156 | (or (string=? target "/") |
| 157 | (string=? target "/") | ||
| 158 | (and (string? source) | 157 | (and (string? source) |
| 159 | (string-prefix? "/dev/" source)) | 158 | (string-prefix? "/dev/" source)) |
| 160 | 159 | ||