From e5997888fa75f13735107166d51a1359381d8a79 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Wed, 15 Oct 2014 23:55:36 +0200
Subject: [PATCH] derivations: 'graft-derivation' correctly handles
multiple-output sources.
* guix/derivations.scm (graft-derivation): Add DRV as input for each one
of OUTPUT-NAMES.
---
guix/derivations.scm | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/guix/derivations.scm b/guix/derivations.scm
index 211ecc6f961..ae9d2f46c78 100644
--- a/guix/derivations.scm
+++ b/guix/derivations.scm
@@ -1040,7 +1040,9 @@ (define add-label
#:guile-for-build guile
#:modules '((guix build graft)
(guix build utils))
- #:inputs `(("original" ,drv)
+ #:inputs `(,@(map (lambda (out)
+ `("x" ,drv ,out))
+ output-names)
,@(append (map add-label sources)
(map add-label targets)))
#:outputs output-names
--
GitLab