mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-04-06 13:10:33 +02:00
gexp: Allow file-unions with dangling symlinks.
* guix/gexp.scm (file-union): Add #:dangling-symlinks? parameter. Change-Id: I09d44ec785fd7141b02dee2d8dc23ccc499aa933 Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
This commit is contained in:
committed by
Maxim Cournoyer
parent
93e74686ea
commit
9b7213fc11
@@ -12673,11 +12673,13 @@ as in:
|
||||
This is the declarative counterpart of @code{text-file*}.
|
||||
@end deffn
|
||||
|
||||
@deffn {Procedure} file-union name files
|
||||
Return a @code{<computed-file>} that builds a directory containing all of @var{files}.
|
||||
Each item in @var{files} must be a two-element list where the first element is the
|
||||
file name to use in the new directory, and the second element is a gexp
|
||||
denoting the target file. Here's an example:
|
||||
@deffn {Procedure} file-union name files [#:dangling-symlinks? #f]
|
||||
Return a @code{<computed-file>} that builds a directory containing all
|
||||
of @var{files}. Each item in @var{files} must be a two-element list
|
||||
where the first element is the file name to use in the new directory,
|
||||
and the second element is a gexp denoting the target file.
|
||||
@code{#:dangling-symlinks?} controls if gexps must lower to an existing
|
||||
file. Here's an example:
|
||||
|
||||
@lisp
|
||||
(file-union "etc"
|
||||
|
||||
Reference in New Issue
Block a user