2
0
Fork 0
mirror of git://git.savannah.gnu.org/guix/maintenance.git synced 2023-12-14 03:33:04 +01:00

hydra: services: Add build output support to Cuirass.

Cuirass recently gained build output support. This means that it is possible
to indicate from the specifications which files from a job output should be
made available for download via the Web UI.

Use it to make ISO9660 images available for download.

* hydra/modules/sysadmin/services.scm (cuirass-specs): Add build-outputs
support.
This commit is contained in:
Mathieu Othacehe 2020-06-10 17:56:24 +02:00
parent 94f7a16818
commit c8e4117b18
No known key found for this signature in database
GPG key ID: 8354763531769CA6

View file

@ -218,7 +218,12 @@
(#:proc-file . "build-aux/cuirass/gnu-system.scm")
(#:proc . cuirass-jobs)
(#:proc-args (subset . "all") (systems #$@systems))
(#:inputs . (#$(guix-input "guix" "master"))))
(#:inputs . (#$(guix-input "guix" "master")))
;; Save the build output of the ISO9660-IMAGE job.
(#:build-outputs . (((#:job . "iso9660-image*")
(#:type . "iso")
(#:output . "out")
(#:path . "")))))
`((#:name . "guix-modular-master")
;; Keep the load path empty: it uses the available Guix modules
;; to build a trampoline.
@ -228,7 +233,8 @@
(#:proc-file . "build-aux/cuirass/guix-modular.scm")
(#:proc . cuirass-jobs)
(#:proc-args (systems #$@systems))
(#:inputs . (#$(guix-input "guix-modular" "master")))))
(#:inputs . (#$(guix-input "guix-modular" "master")))
(#:build-outputs . ())))
#~())
#$@(if (member "staging" branches)
#~(`((#:name . "staging-staging")
@ -238,7 +244,8 @@
(#:proc-file . "build-aux/cuirass/gnu-system.scm")
(#:proc . cuirass-jobs)
(#:proc-args (systems #$@systems))
(#:inputs . (#$(guix-input "staging" "staging")))))
(#:inputs . (#$(guix-input "staging" "staging")))
(#:build-outputs . ())))
#~())
#$@(if (member "core-updates" branches)
#~(`((#:name . "core-updates-core-updates")
@ -248,7 +255,8 @@
(#:proc-file . "build-aux/cuirass/gnu-system.scm")
(#:proc . cuirass-jobs)
(#:proc-args (subset . core) (systems #$@systems))
(#:inputs . (#$(guix-input "core-updates" "core-updates")))))
(#:inputs . (#$(guix-input "core-updates" "core-updates")))
(#:build-outputs . ())))
#~())))