diff options
author | Christopher Baines <mail@cbaines.net> | 2022-09-02 18:12:10 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2022-09-02 18:12:10 +0100 |
commit | 31b3ab65da2d9a02f0453d12a81816b25c8ad75d (patch) | |
tree | 7ac0d58aac121305ff65ecc6b6511d43107dcb40 | |
parent | b026210afc93fae5d794feb6e151da0e2aac8ded (diff) | |
download | build-coordinator-31b3ab65da2d9a02f0453d12a81816b25c8ad75d.tar build-coordinator-31b3ab65da2d9a02f0453d12a81816b25c8ad75d.tar.gz |
Properly handle build failure statuses
-rw-r--r-- | guix-build-coordinator/agent.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm index 27b0633..eb3ec3c 100644 --- a/guix-build-coordinator/agent.scm +++ b/guix-build-coordinator/agent.scm @@ -799,8 +799,10 @@ but the guix-daemon claims it's unavailable" (lambda (exn) (if (store-protocol-error? exn) (cond - ((eq? (store-protocol-error-status exn) 100) + ((eq? (store-protocol-error-status exn) 1) (log-msg lgr 'INFO build-id ": build failed")) + ((eq? (store-protocol-error-status exn) 100) + (log-msg lgr 'INFO build-id ": build failed (permanent failure)")) ((eq? (store-protocol-error-status exn) 101) (log-msg lgr 'INFO build-id ": build failed due to a timeout")) (else |