diff options
author | Mark H Weaver <mhw@netris.org> | 2015-05-28 22:50:19 -0400 |
---|---|---|
committer | Mark H Weaver <mhw@netris.org> | 2015-05-29 14:33:32 -0400 |
commit | ae0bcc1e9d43fe961224ef564a36d2ec564271b6 (patch) | |
tree | 0bb2f555fff9e7793086874ddded47dd95261bfc | |
parent | 307153c1ef16132fffebe96cc67ad662e37006a4 (diff) | |
download | patches-ae0bcc1e9d43fe961224ef564a36d2ec564271b6.tar patches-ae0bcc1e9d43fe961224ef564a36d2ec564271b6.tar.gz |
hydra: Support per-package absolute build timeouts.
* build-aux/hydra/gnu-system.scm (package->alist): Use the 'timeout' value in
the package 'properties' alist, if present.
-rw-r--r-- | build-aux/hydra/gnu-system.scm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/build-aux/hydra/gnu-system.scm b/build-aux/hydra/gnu-system.scm index 8d9b43c0b0..83cc6fb177 100644 --- a/build-aux/hydra/gnu-system.scm +++ b/build-aux/hydra/gnu-system.scm @@ -78,10 +78,8 @@ (license . ,(package-license package)) (home-page . ,(package-home-page package)) (maintainers . ("bug-guix@gnu.org")) - - ;; Work around versions of 'hydra-eval-guile-jobs' before Hydra commit - ;; 61448ca (27 Feb. 2014) which used a default timeout of 2h. - (timeout . 72000))) + (timeout . ,(or (assoc-ref (package-properties package) 'timeout) + 72000)))) ; 20 hours by default (define (package-job store job-name package system) "Return a job called JOB-NAME that builds PACKAGE on SYSTEM." |