me
/
guix
Archived
1
0
Fork 0

hydra: Don't build non-substitutable packages.

* build-aux/hydra/gnu-system.scm (package->job): Compute PACKAGE's
derivation; return #f if 'substitutable-derivation?' returns #f.
master
Ludovic Courtès 2017-06-15 22:45:43 +02:00
parent cbee955901
commit 82c955c0a5
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 5 additions and 1 deletions

View File

@ -245,7 +245,11 @@ valid."
(cond ((member package base-packages)
#f)
((supported-package? package system)
(package-job store (job-name package) package system))
(let ((drv (package-derivation store package system
#:graft? #f)))
(and (substitutable-derivation? drv)
(package-job store (job-name package)
package system))))
(else
#f)))))