diff options
Diffstat (limited to 'gnu/services')
| -rw-r--r-- | gnu/services/base.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/services/base.scm b/gnu/services/base.scm index 1536320671a..4a4f1d17c18 100644 --- a/gnu/services/base.scm +++ b/gnu/services/base.scm @@ -534,7 +534,8 @@ upon boot." (let ((errno (system-error-errno args))) (format #t "failed to unmount '~a': ~a~%" mount-point (strerror errno)))))) - (filter (negate known?) (mount-points))) + ;; Unmount mount points in reverse order of mounting. + (reverse (filter (negate known?) (mount-points)))) #f)))) (cons* sink user-unmount |