From 8eb5c047b963cc426051891af6c1226b0ebbcd97 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Tue, 8 Jul 2025 07:24:11 +0100 Subject: [PATCH] Avoid raising an unhandled exception --- guix-data-service/jobs/load-new-guix-revision.scm | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/guix-data-service/jobs/load-new-guix-revision.scm b/guix-data-service/jobs/load-new-guix-revision.scm index 98e4588..75be80e 100644 --- a/guix-data-service/jobs/load-new-guix-revision.scm +++ b/guix-data-service/jobs/load-new-guix-revision.scm @@ -2929,7 +2929,13 @@ WHERE builder != 'builtin:download' ;; Prompt getting the guix-revision-id as soon as possible (spawn-fiber (lambda () - (fibers-force guix-revision-id-promise))) + (with-exception-handler + (lambda _ + ;; Silently handle this exception + #f) + (lambda () + (fibers-force guix-revision-id-promise)) + #:unwind? #t))) (let* ((guix-source channel-derivations-by-system