mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-25 13:58:15 -05:00
ci: Support packages with multiple channels.
This is a follow-up of 61a1165340
. For packages
provided by external channels, package-channels procedure will return at least
two channels. Take it into account.
* gnu/ci.scm (cuirass-jobs): Fix channels subset argument.
This commit is contained in:
parent
b76762a9b7
commit
cbfcbb79df
1 changed files with 4 additions and 5 deletions
|
@ -527,11 +527,10 @@ (define source
|
|||
(let ((all (all-packages)))
|
||||
(filter-map
|
||||
(lambda (package)
|
||||
(match (package-channels package)
|
||||
((channel . _)
|
||||
(and (member (channel-name channel) channels)
|
||||
(package->job store package system)))
|
||||
(else #f)))
|
||||
(any (lambda (channel)
|
||||
(and (member (channel-name channel) channels)
|
||||
(package->job store package system)))
|
||||
(package-channels package)))
|
||||
all)))
|
||||
(('packages . rest)
|
||||
;; Build selected list of packages only.
|
||||
|
|
Loading…
Reference in a new issue