From 4b7f3407e97e4ca66f7d58a3515f423f03c671ab Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Tue, 16 Jul 2013 09:47:01 +0200
Subject: hydra: Honor the `system' argument.

* build-aux/hydra/gnu-system.scm (hydra-jobs): Really look up the
  `system' symbol in ARGUMENTS.
---
 build-aux/hydra/gnu-system.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'build-aux')

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
-- 
cgit v1.2.3