grafts: Slight simplification.
* guix/grafts.scm (graft-derivation)[output-names]: Use 'derivation-output-names'.
This commit is contained in:
parent
82f5186650
commit
cd05d38812
|
@ -87,9 +87,7 @@ applied."
|
||||||
(map derivation-output-path outputs))))
|
(map derivation-output-path outputs))))
|
||||||
|
|
||||||
(define output-names
|
(define output-names
|
||||||
(match (derivation-outputs drv)
|
(derivation-output-names drv))
|
||||||
(((names . outputs) ...)
|
|
||||||
names)))
|
|
||||||
|
|
||||||
(define build
|
(define build
|
||||||
`(begin
|
`(begin
|
||||||
|
|
Loading…
Reference in New Issue