diff options
| author | Christopher Baines <mail@cbaines.net> | 2023-03-29 11:49:35 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2023-03-29 11:59:10 +0100 |
| commit | 5ae5e71e16a8cd8907836fd1188e0ca4b0889788 (patch) | |
| tree | ea6a32a8431f9af82206ba014e9aa6da838c06ae | |
| parent | 07a10aabd6cd334920b2026af2421aaf28ad749a (diff) | |
| download | build-coordinator-5ae5e71e16a8cd8907836fd1188e0ca4b0889788.tar build-coordinator-5ae5e71e16a8cd8907836fd1188e0ca4b0889788.tar.gz | |
Provide more information in process-event error handling
There's still problems here, but it's unclear where.
| -rw-r--r-- | guix-build-coordinator/coordinator.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/guix-build-coordinator/coordinator.scm b/guix-build-coordinator/coordinator.scm index 5d4316a..05f1fd2 100644 --- a/guix-build-coordinator/coordinator.scm +++ b/guix-build-coordinator/coordinator.scm @@ -996,6 +996,10 @@ (define (process-event id event arguments handler) (with-exception-handler (lambda (exn) + (log-msg + (build-coordinator-logger build-coordinator) + 'ERROR + "process-event " event " (" id ") exception: " exn) (metric-increment failure-counter-metric #:label-values `((event . ,event))) @@ -1016,7 +1020,7 @@ (lambda args (apply log-msg (build-coordinator-logger build-coordinator) 'ERROR - "error running " event " hook: " + "error running " event " (" id ") hook: " args) (backtrace))) (log-msg (build-coordinator-logger build-coordinator) |