aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix-build-coordinator/agent.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm
index 200a343..e7af677 100644
--- a/guix-build-coordinator/agent.scm
+++ b/guix-build-coordinator/agent.scm
@@ -690,9 +690,9 @@
output-paths))
(path-substitutes
(begin
- (with-store store
+ (with-store substitute-store
(apply set-build-options
- store
+ substitute-store
`(,@(if non-derivation-substitute-urls
(list #:substitute-urls
non-derivation-substitute-urls)
@@ -728,7 +728,7 @@ unable to query substitute servers without caching"))
(let ((log-port (open-output-string)))
;; TODO Do something with the logged output
(parameterize ((current-build-output-port log-port))
- (if (has-substitutes? store file)
+ (if (has-substitutes? substitute-store file)
#t
(begin
(log-msg