Avoid raising an unhandled exception

This commit is contained in:
Christopher Baines 2025-07-08 07:24:11 +01:00
parent 4d04a7f47b
commit 8eb5c047b9

View file

@ -2929,7 +2929,13 @@ WHERE builder != 'builtin:download'
;; Prompt getting the guix-revision-id as soon as possible ;; Prompt getting the guix-revision-id as soon as possible
(spawn-fiber (spawn-fiber
(lambda () (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 (let* ((guix-source
channel-derivations-by-system channel-derivations-by-system