build-system/gnu: Fix 'install' phase of 'gnu-dist'.

* guix/build/gnu-dist.scm (install-dist): Fix 2nd argument to
'for-each'.
This commit is contained in:
Ludovic Courtès 2020-06-18 11:27:06 +02:00
parent 290c316621
commit f9a0fc9dbb
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -40,13 +40,10 @@ (define* (build #:key build-before-dist? make-flags (dist-target "distcheck")
(apply invoke "make" dist-target make-flags))
(define* (install-dist #:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(meta (string-append out "/nix-support")) ; Hydra meta-data
(tarballs (find-files "." "\\.tar\\.")))
(mkdir out)
(let ((out (assoc-ref outputs "out")))
(for-each (lambda (tarball)
(copy-file tarball (string-append out "/" tarball)))
out)
(install-file tarball out))
(find-files "." "\\.tar\\."))
#t))
(define %dist-phases