me/guix
Archived
1
0
Fork 0
Code Activity

file-systems: Add a 'location' field to <file-system>.

Browse source 
* gnu/system/file-systems.scm (<file-system>)[location]: New field.
This commit is contained in:
Ludovic Courtès 2017-10-04 21:35:31 +02:00
parent aed1f1b049
commit dd41a7f8d8
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
gnu/system/file-systems.scm
View file

@ -38,6 +38,7 @@
file-system-check? file-system-check?
file-system-create-mount-point? file-system-create-mount-point?
file-system-dependencies file-system-dependencies
file-system-location
file-system-type-predicate file-system-type-predicate
@ -101,7 +102,10 @@
(create-mount-point? file-system-create-mount-point? ; Boolean (create-mount-point? file-system-create-mount-point? ; Boolean
(default #f)) (default #f))
(dependencies file-system-dependencies ; list of <file-system> (dependencies file-system-dependencies ; list of <file-system>
(default '()))) ; or <mapped-device> (default '())) ; or <mapped-device>
(location file-system-location
(default (current-source-location))
(innate)))
;; Note: This module is used both on the build side and on the host side. ;; Note: This module is used both on the build side and on the host side.
;; Arrange not to pull (guix store) and (guix config) because the latter ;; Arrange not to pull (guix store) and (guix config) because the latter