From 7c3c0374de446af387c8478f77083fd0e357253c Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Fri, 17 Oct 2014 23:20:39 +0200 Subject: packages: Add 'package-transitive-supported-systems'. * guix/packages.scm (package-transitive-supported-systems): New procedure. * tests/packages.scm ("package-transitive-supported-systems"): New test. * build-aux/hydra/gnu-system.scm (package->job): Use it. --- build-aux/hydra/gnu-system.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'build-aux') diff --git a/build-aux/hydra/gnu-system.scm b/build-aux/hydra/gnu-system.scm index c26bcff6ae..c7ad730abc 100644 --- a/build-aux/hydra/gnu-system.scm +++ b/build-aux/hydra/gnu-system.scm @@ -172,7 +172,8 @@ (define package->job valid." (cond ((member package base-packages) #f) - ((member system (package-supported-systems package)) + ((member system + (package-transitive-supported-systems package)) (package-job store (job-name package) package system)) (else #f))))) -- cgit v1.2.3