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 | |
| 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>
| -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." | |||
| 534 | (let ((errno (system-error-errno args))) | 534 | (let ((errno (system-error-errno args))) |
| 535 | (format #t "failed to unmount '~a': ~a~%" | 535 | (format #t "failed to unmount '~a': ~a~%" |
| 536 | mount-point (strerror errno)))))) | 536 | mount-point (strerror errno)))))) |
| 537 | (filter (negate known?) (mount-points))) | 537 | ;; Unmount mount points in reverse order of mounting. |
| 538 | (reverse (filter (negate known?) (mount-points)))) | ||
| 538 | #f)))) | 539 | #f)))) |
| 539 | 540 | ||
| 540 | (cons* sink user-unmount | 541 | (cons* sink user-unmount |