diff options
| author | Dariqq <dariqq@posteo.net> | 2025-11-27 17:19:53 +0000 |
|---|---|---|
| committer | Rutherther <rutherther@ditigal.xyz> | 2025-12-20 13:37:11 +0100 |
| commit | 32988df4931f2bb4d81d15bfcebd8d904cd97845 (patch) | |
| tree | 95ccd1886dd551d33421bed715e02bb97e092b85 /gnu/services | |
| parent | 9aa7f05639fe42ab49506a90baceee9affc45573 (diff) | |
services: file-systems: Reverse order of unmounting manual mounts.
* gnu/services/base.scm (file-system-shepherd-services): Reverse order of
mount-points in service 'user-file-systems.
Change-Id: I68df0c22bc6bacdc866b9adf62e7059f20e5842f
Signed-off-by: Rutherther <rutherther@ditigal.xyz>
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 |