1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00

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>
This commit is contained in:
Dariqq
2025-11-27 17:19:53 +00:00
committed by Rutherther
parent 9aa7f05639
commit 32988df493

View File

@@ -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