diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2014-03-25 18:57:07 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2014-03-25 18:57:07 +0100 |
| commit | 1971737f2bf8980f5eb72b61f9bfeb788574eec9 (patch) | |
| tree | b23924be82d30ce123111f6d963416b0a2540c04 /build-aux | |
| parent | 9214f9bc0a573b475ccc846434a5954ea7838072 (diff) | |
| download | guix-1971737f2bf8980f5eb72b61f9bfeb788574eec9.tar guix-1971737f2bf8980f5eb72b61f9bfeb788574eec9.tar.gz | |
hydra: Hard-code target systems.
* build-aux/hydra/gnu-system.scm (hydra-jobs)[systems]: Define locally,
independently of ARGUMENTS. This matches the new Hydra convention,
where using a 'system' input is deprecated.
Diffstat (limited to 'build-aux')
| -rw-r--r-- | build-aux/hydra/gnu-system.scm | 11 |
1 files changed, 2 insertions, 9 deletions
diff --git a/build-aux/hydra/gnu-system.scm b/build-aux/hydra/gnu-system.scm index 4651935831..083ff2a7cd 100644 --- a/build-aux/hydra/gnu-system.scm +++ b/build-aux/hydra/gnu-system.scm @@ -111,15 +111,8 @@ SYSTEM." (define (hydra-jobs store arguments) "Return Hydra jobs." (define systems - (match (filter-map (match-lambda - (('system . value) - value) - (_ #f)) - arguments) - ((lst ..1) - lst) - (_ - (list (%current-system))))) + ;; Systems we want to build for. + '("x86_64-linux" "i686-linux")) (define subset (match (assoc-ref arguments 'subset) |