derivations: 'substitution-oracle' returns a <substitutable>.

* guix/derivations.scm (substitution-oracle): Use
'substitution-path-info' instead of 'substitution-paths'.  Turn SUBST
into a vhash from path to <substitutable>.  Change the returned
procedure to provide a <substitutable> instead of a Boolean.
* tests/derivations.scm ("substitution-oracle and #:substitute? #f"):
Mock 'substitutable-path-info' instead of 'substitutable-paths'.
This commit is contained in:
Ludovic Courtès 2017-05-31 09:55:56 +02:00
parent fb226b4351
commit ef51ac21ee
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
2 changed files with 13 additions and 5 deletions

View file

@ -919,7 +919,7 @@
(set! query paths)
'())
(mock ((guix store) substitutable-paths
(mock ((guix store) substitutable-path-info
record-substitutable-path-query)
(let ((pred (substitution-oracle store (list drv))))