diff options
-rw-r--r-- | build-aux/hydra/guix.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/build-aux/hydra/guix.scm b/build-aux/hydra/guix.scm index 4330e31632..a8d740e03c 100644 --- a/build-aux/hydra/guix.scm +++ b/build-aux/hydra/guix.scm @@ -94,8 +94,8 @@ containing a Git checkout of Guix." (define checkout (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))) - `((tarball . ,(package->alist store - (tarball-package directory) - (%current-system)))))) + `((tarball . ,(cute package->alist store + (tarball-package directory) + (%current-system)))))) |