diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2013-07-16 09:47:01 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2013-07-16 09:47:48 +0200 |
| commit | 4b7f3407e97e4ca66f7d58a3515f423f03c671ab (patch) | |
| tree | 5bd85fe78a45e6319141c2e982f72fb07845a223 /build-aux/hydra/gnu-system.scm | |
| parent | d409c8ab883542ab903d47a3b83c1ba3ad81d701 (diff) | |
| download | guix-4b7f3407e97e4ca66f7d58a3515f423f03c671ab.tar guix-4b7f3407e97e4ca66f7d58a3515f423f03c671ab.tar.gz | |
hydra: Honor the `system' argument.
* build-aux/hydra/gnu-system.scm (hydra-jobs): Really look up the
`system' symbol in ARGUMENTS.
Diffstat (limited to 'build-aux/hydra/gnu-system.scm')
| -rw-r--r-- | build-aux/hydra/gnu-system.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/build-aux/hydra/gnu-system.scm b/build-aux/hydra/gnu-system.scm index de3cd1154b..57f98dfa33 100644 --- a/build-aux/hydra/gnu-system.scm +++ b/build-aux/hydra/gnu-system.scm @@ -93,7 +93,7 @@ SYSTEM." (define (hydra-jobs store arguments) "Return Hydra jobs." (define system - (or (assoc-ref arguments system) + (or (assoc-ref arguments 'system) (%current-system))) (define job-name |