diff options
Diffstat (limited to 'bffe')
| -rw-r--r-- | bffe/manage-builds.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/bffe/manage-builds.scm b/bffe/manage-builds.scm index e100254..b317824 100644 --- a/bffe/manage-builds.scm +++ b/bffe/manage-builds.scm @@ -298,7 +298,11 @@ (while #t (with-exception-handler (lambda (exn) - (log-msg 'ERROR "exception in submit builds thread: " exn)) + (with-exception-handler + (const #t) + (lambda () + (log-msg 'ERROR "exception in submit builds thread: " exn)) + #:unwind? #t)) (lambda () (for-each (lambda (repository-id) |