From e5997888fa75f13735107166d51a1359381d8a79 Mon Sep 17 00:00:00 2001
From: Ludovic Courtès <ludo@gnu.org>
Date: Wed, 15 Oct 2014 23:55:36 +0200
Subject: 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 211ecc6f96..ae9d2f46c7 100644
--- a/guix/derivations.scm
+++ b/guix/derivations.scm
@@ -1040,7 +1040,9 @@ applied."
                                      #: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
-- 
cgit v1.2.3