TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

ci: Change manifest argument type.

Browse source 
* gnu/ci.scm (arguments->manifests): Change manifest argument type.
This commit is contained in:
Mathieu Othacehe 2021-03-21 15:35:34 +01:00
parent d1e1682749
commit 862af8c2ed
No known key found for this signature in database
GPG key ID: 8354763531769CA6
1 changed files with 6 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
gnu/ci.scm
View file

@ -423,16 +423,12 @@ (define (adjust package result)
(define (arguments->manifests arguments channels)
"Return the list of manifests extracted from ARGUMENTS."
(define (channel-name->checkout name)
(let ((channel (find (lambda (channel)
(eq? (channel-name channel) name))
channels)))
(channel-url channel)))
(map (match-lambda
((name . path)
(let ((checkout (channel-name->checkout name)))
(in-vicinity checkout path))))
(map (lambda (manifest)
(any (lambda (checkout)
(let ((path (in-vicinity checkout manifest)))
(and (file-exists? path)
path)))
(map channel-url channels)))
arguments))
(define (manifests->packages store manifests)