derivations: 'graft-derivation' correctly handles multiple-output sources.

* guix/derivations.scm (graft-derivation): Add DRV as input for each one
  of OUTPUT-NAMES.
This commit is contained in:
Ludovic Courtès 2014-10-15 23:55:36 +02:00
parent 8dcec91426
commit e5997888fa
1 changed files with 3 additions and 1 deletions

View File

@ -1040,7 +1040,9 @@ applied."
#:guile-for-build guile #:guile-for-build guile
#:modules '((guix build graft) #:modules '((guix build graft)
(guix build utils)) (guix build utils))
#:inputs `(("original" ,drv) #:inputs `(,@(map (lambda (out)
`("x" ,drv ,out))
output-names)
,@(append (map add-label sources) ,@(append (map add-label sources)
(map add-label targets))) (map add-label targets)))
#:outputs output-names #:outputs output-names