aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix-build-coordinator/agent.scm22
1 files changed, 11 insertions, 11 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm
index d54573e..3520adb 100644
--- a/guix-build-coordinator/agent.scm
+++ b/guix-build-coordinator/agent.scm
@@ -93,17 +93,17 @@
(with-store store
(set-build-options store #:substitute-urls substitute-urls)
- (map (lambda (file)
- (and
- (has-substiutes-no-cache? substitute-urls file)
- (if (has-substitutes? store file)
- #t
- (begin
- (simple-format
- #t "warning: a substitute should be available for ~A, but the daemon claims it's not\n"
- file)
- #f))))
- missing-paths))))
+ (map (lambda (file)
+ (and
+ (has-substiutes-no-cache? substitute-urls file)
+ (if (has-substitutes? store file)
+ #t
+ (begin
+ (simple-format
+ #t "warning: a substitute should be available for ~A, but the daemon claims it's not\n"
+ file)
+ #f))))
+ missing-paths))))
(if (null? missing-paths)
'()