diff options
Diffstat (limited to 'build-aux/hydra/guix.scm')
| -rw-r--r-- | build-aux/hydra/guix.scm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/build-aux/hydra/guix.scm b/build-aux/hydra/guix.scm index 941d240233..57041d695f 100644 --- a/build-aux/hydra/guix.scm +++ b/build-aux/hydra/guix.scm @@ -98,15 +98,16 @@ containing a Git checkout of Guix." (_ (list (%current-system))))) - (define checkout + (define guix-checkout (assq-ref arguments 'guix)) (define nix-checkout (assq-ref arguments 'nix)) (format (current-error-port) "using checkout ~s (Nix: ~s)~%" - checkout nix-checkout) - (let ((directory (assq-ref checkout 'file-name))) + guix-checkout nix-checkout) + (let ((guix (assq-ref guix-checkout 'file-name)) + (nix (assq-ref nix-checkout 'file-name))) `((tarball . ,(cute package->alist store - (tarball-package directory nix-checkout) + (tarball-package guix nix) (%current-system)))))) |