diff options
| author | Christopher Baines <mail@cbaines.net> | 2022-09-02 16:43:08 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2022-09-02 17:12:03 +0100 |
| commit | b026210afc93fae5d794feb6e151da0e2aac8ded (patch) | |
| tree | f37602126e8a348462883e97990b50059c8ce7f6 /guix-build-coordinator | |
| parent | 64fe85ff20443304bfeaa8ffb16dbf2be14c3148 (diff) | |
| download | build-coordinator-b026210afc93fae5d794feb6e151da0e2aac8ded.tar build-coordinator-b026210afc93fae5d794feb6e151da0e2aac8ded.tar.gz | |
Don't record the build as failed if the exception is unknown
As this can cause spurious failures.
Diffstat (limited to 'guix-build-coordinator')
| -rw-r--r-- | guix-build-coordinator/agent.scm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm index f52af5f..27b0633 100644 --- a/guix-build-coordinator/agent.scm +++ b/guix-build-coordinator/agent.scm @@ -806,8 +806,11 @@ but the guix-daemon claims it's unavailable" (else (log-msg lgr 'ERROR build-id ": unknown store protocol error: " (store-protocol-error-message exn) "(status: " - (store-protocol-error-status exn) ")"))) - (log-msg lgr 'ERROR build-id ": unknown exception " exn)) + (store-protocol-error-status exn) ")") + (raise-exception exn))) + (begin + (log-msg lgr 'ERROR build-id ": unknown exception " exn) + (raise-exception exn))) #f) (lambda () (build-things store (list (derivation-file-name derivation))) |