diff options
author | Ludovic Courtès <ludo@gnu.org> | 2015-10-29 18:22:19 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2015-10-29 19:07:58 +0100 |
commit | e502bf8953afcd1e0cf29cd729e7c62c5c27792f (patch) | |
tree | 24a796b0e8beef91632b2d36f93fae32b2543c7d /gnu/system | |
parent | 362f496da9fc929d9548b8a56990779718b13c95 (diff) | |
download | guix-e502bf8953afcd1e0cf29cd729e7c62c5c27792f.tar.gz |
system: File systems depend on their corresponding device mappings.
Fixes a regression introduced in commit 0adfe95. * gnu/system.scm (other-file-system-services)[requirements]: Remove. [add-dependencies]: New procedure. Use it. * gnu/system/file-systems.scm (<file-system>)[dependencies]: Update comment. * gnu/services/base.scm (mapped-device->dmd-service-name, dependency->dmd-service-name): New procedures. (file-system-service-type): Use it.
Diffstat (limited to 'gnu/system')
-rw-r--r-- | gnu/system/file-systems.scm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/gnu/system/file-systems.scm b/gnu/system/file-systems.scm index 8155b273e3..0a4b385fe3 100644 --- a/gnu/system/file-systems.scm +++ b/gnu/system/file-systems.scm @@ -99,9 +99,8 @@ (default #t)) (create-mount-point? file-system-create-mount-point? ; Boolean (default #f)) - (dependencies file-system-dependencies ; list of strings (mount - ; points depended on) - (default '()))) + (dependencies file-system-dependencies ; list of <file-system> + (default '()))) ; or <mapped-device> (define-inlinable (file-system-needed-for-boot? fs) "Return true if FS has the 'needed-for-boot?' flag set, or if it's the root |