nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

hydra: Return a symbol/thunk pair. 

* build-aux/hydra/guix.scm (hydra-jobs): Return a symbol/thunk pair.
This commit is contained in:
Ludovic Courtès 2013-08-25 16:48:10 +02:00
parent 9eed6f9b88
commit 6ad507ae54
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
build-aux/hydra/guix.scm
View File

@ -94,8 +94,8 @@ containing a Git checkout of Guix."
(define checkout (define checkout
(assq-ref arguments 'guix)) (assq-ref arguments 'guix))
(format #t "using checkout ~s~%" checkout) (format (current-error-port) "using checkout ~s~%" checkout)
(let ((directory (assq-ref checkout 'file-name))) (let ((directory (assq-ref checkout 'file-name)))
`((tarball . ,(package->alist store `((tarball . ,(cute package->alist store
(tarball-package directory) (tarball-package directory)
(%current-system)))))) (%current-system))))))