summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gnu/ci.scm9
1 files changed, 4 insertions, 5 deletions
diff --git a/gnu/ci.scm b/gnu/ci.scm
index 664cabfec6..acd05a18b4 100644
--- a/gnu/ci.scm
+++ b/gnu/ci.scm
@@ -527,11 +527,10 @@ valid."
(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.