diff options
author | Ludovic Courtès <ludo@gnu.org> | 2017-05-31 09:55:56 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2017-06-02 18:47:06 +0200 |
commit | ef51ac21eec28de3b0fb693f88be5f3c494d464a (patch) | |
tree | 128869049a4b20dfbc8fa31ee6693caa5135adcf /tests/derivations.scm | |
parent | fb226b43511671bee3463a02eea9e041d2610fef (diff) | |
download | patches-ef51ac21eec28de3b0fb693f88be5f3c494d464a.tar patches-ef51ac21eec28de3b0fb693f88be5f3c494d464a.tar.gz |
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'.
Diffstat (limited to 'tests/derivations.scm')
-rw-r--r-- | tests/derivations.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/derivations.scm b/tests/derivations.scm index cabbf7b951..d4e1a32bb6 100644 --- a/tests/derivations.scm +++ b/tests/derivations.scm @@ -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)))) |