aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix-build-coordinator/agent.scm7
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)))