1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00

graph: Use 'derivation-input-derivation'.

* guix/scripts/graph.scm (derivation-dependencies): Use
'derivation-input-derivation'.
This commit is contained in:
Ludovic Courtès
2019-06-23 09:38:23 +02:00
parent 9844d0091e
commit a250061986

View File

@@ -254,8 +254,7 @@ GNU-BUILD-SYSTEM have zero dependencies."
"Return the <derivation> objects and store items corresponding to the
dependencies of OBJ, a <derivation> or store item."
(if (derivation? obj)
(append (map (compose read-derivation-from-file derivation-input-path)
(derivation-inputs obj))
(append (map derivation-input-derivation (derivation-inputs obj))
(derivation-sources obj))
'()))