aboutsummaryrefslogtreecommitdiff
path: root/guix-build-coordinator/agent.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2021-12-24 13:08:27 +0000
committerChristopher Baines <mail@cbaines.net>2021-12-24 13:08:27 +0000
commit48b64f2bcdac203f91a1aa8c45afcff8af8ef3b9 (patch)
treef973e7b63043b00143a05c08a1b82c1e61163bd1 /guix-build-coordinator/agent.scm
parent5c3b4b9897ddf2989950e4b4e6e670cdf830235f (diff)
downloadbuild-coordinator-48b64f2bcdac203f91a1aa8c45afcff8af8ef3b9.tar
build-coordinator-48b64f2bcdac203f91a1aa8c45afcff8af8ef3b9.tar.gz
Log unknown store protocol error messages
Diffstat (limited to 'guix-build-coordinator/agent.scm')
-rw-r--r--guix-build-coordinator/agent.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm
index eabb917..d89fbf2 100644
--- a/guix-build-coordinator/agent.scm
+++ b/guix-build-coordinator/agent.scm
@@ -744,8 +744,9 @@ but the guix-daemon claims it's unavailable"
((eq? (store-protocol-error-status exn) 101)
(log-msg lgr 'INFO build-id ": build failed due to a timeout"))
(else
- (log-msg lgr 'ERROR build-id ": unknown error status "
- (store-protocol-error-status exn))))
+ (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))
#f)
(lambda ()