aboutsummaryrefslogtreecommitdiff
path: root/guix-qa-frontpage/patchwork.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix-qa-frontpage/patchwork.scm')
-rw-r--r--guix-qa-frontpage/patchwork.scm12
1 files changed, 11 insertions, 1 deletions
diff --git a/guix-qa-frontpage/patchwork.scm b/guix-qa-frontpage/patchwork.scm
index 2efef03..8f9d570 100644
--- a/guix-qa-frontpage/patchwork.scm
+++ b/guix-qa-frontpage/patchwork.scm
@@ -125,7 +125,17 @@
count)))
(debbugs-guix-usertag-data
- (call-with-delay-logging debbugs-get-issues-with-guix-usertag))
+ (with-exception-handler
+ (lambda (exn)
+ (simple-format
+ (current-error-port)
+ "exception fetching debbugs-guix-usertag-data: ~A\n"
+ exn)
+ '())
+ (lambda ()
+ (call-with-delay-logging
+ debbugs-get-issues-with-guix-usertag))
+ #:unwind? #t))
(usertag-lookup
(let ((hash-table (make-hash-table)))
(for-each