From 32988df4931f2bb4d81d15bfcebd8d904cd97845 Mon Sep 17 00:00:00 2001 From: Dariqq Date: Thu, 27 Nov 2025 17:19:53 +0000 Subject: [PATCH] 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 --- gnu/services/base.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/gnu/services/base.scm b/gnu/services/base.scm index 1536320671a67277f524ab728bca91ca0e18d1a3..4a4f1d17c180bd7f1eb0b033a53e672c4ac12c15 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