ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-07 07:26:13 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

ci: Support packages with multiple channels.

Browse source 
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:
Mathieu Othacehe 2021-03-14 19:30:36 +01:00
parent b76762a9b7
commit cbfcbb79df
No known key found for this signature in database
GPG key ID: 8354763531769CA6
1 changed files with 4 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
gnu/ci.scm
View file

@ -527,11 +527,10 @@ (define source
(let ((all (all-packages))) (let ((all (all-packages)))
(filter-map (filter-map
(lambda (package) (lambda (package)
(match (package-channels package) (any (lambda (channel)
((channel . _) (and (member (channel-name channel) channels)
(and (member (channel-name channel) channels) (package->job store package system)))
(package->job store package system))) (package-channels package)))
(else #f)))
all))) all)))
(('packages . rest) (('packages . rest)
;; Build selected list of packages only. ;; Build selected list of packages only.