aboutsummaryrefslogtreecommitdiff
path: root/guix-build-coordinator/build-allocator.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix-build-coordinator/build-allocator.scm')
-rw-r--r--guix-build-coordinator/build-allocator.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/guix-build-coordinator/build-allocator.scm b/guix-build-coordinator/build-allocator.scm
index 70aa59c..265de93 100644
--- a/guix-build-coordinator/build-allocator.scm
+++ b/guix-build-coordinator/build-allocator.scm
@@ -373,8 +373,10 @@
(every (match-lambda
((output . builds)
(if (any (lambda (output-build)
- (string=? (assq-ref output-build 'result)
- "success"))
+ (string=?
+ (or (assq-ref output-build 'result)
+ "unknown")
+ "success"))
builds)
#t
#f)))