diff options
author | Christopher Baines <mail@cbaines.net> | 2023-04-23 18:52:44 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2023-04-23 18:52:44 +0100 |
commit | c65312b8199c211fe26eefc6200b928c0ba3f272 (patch) | |
tree | 234711e6d57e2acb71c601605be14ec4fbc18100 /guix-build-coordinator | |
parent | e65fc96714f8d988a771ee0d5ddd6bd02aacc256 (diff) | |
download | build-coordinator-c65312b8199c211fe26eefc6200b928c0ba3f272.tar build-coordinator-c65312b8199c211fe26eefc6200b928c0ba3f272.tar.gz |
Fix hook processing error message
And rate limit the failures even if they occur in the hook processing code.
Diffstat (limited to 'guix-build-coordinator')
-rw-r--r-- | guix-build-coordinator/coordinator.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/guix-build-coordinator/coordinator.scm b/guix-build-coordinator/coordinator.scm index 055aa2d..2b51f63 100644 --- a/guix-build-coordinator/coordinator.scm +++ b/guix-build-coordinator/coordinator.scm @@ -1092,7 +1092,8 @@ 'CRITICAL "hook processing thread " event-name " exception: " exn)) - #:unwind? #t)) + #:unwind? #t) + (sleep 10)) (lambda () (with-throw-handler #t (lambda () @@ -1109,7 +1110,7 @@ (log-msg (build-coordinator-logger build-coordinator) 'CRITICAL - "error in build allocator thread: " key " " args) + "error in " event-name " hook processing thread: " key " " args) (backtrace)))) #:unwind? #t)))) condvar)) |