branch master updated: Stop using exception handling when inserting blocked_builds entries

[Christopher Baines]

This is an automated email from the git hooks/post-receive script.

cbaines pushed a commit to branch master
in repository data-service.

The following commit(s) were added to refs/heads/master by this push:
     new 4101c6b  Stop using exception handling when inserting blocked_builds 
entries
4101c6b is described below

commit 4101c6b89724b0f4e25c54e853dcdc6d6a6ae562
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Fri Nov 11 10:51:12 2022 +0000

    Stop using exception handling when inserting blocked_builds entries
    
    As it doesn't work in a transaction.
---
 guix-data-service/model/blocked-builds.scm | 9 ++-------
 1 file changed, 2 insertions(+), 7 deletions(-)

diff --git a/guix-data-service/model/blocked-builds.scm 
b/guix-data-service/model/blocked-builds.scm
index 58ec205..cc033f6 100644
--- a/guix-data-service/model/blocked-builds.scm
+++ b/guix-data-service/model/blocked-builds.scm
@@ -174,13 +174,8 @@ ON CONFLICT DO NOTHING")
      '()))
 
   (unless (null? data)
-    (with-exception-handler
-        (lambda (exn)
-          (create-partitions)
-
-          (try-insert))
-      try-insert
-      #:unwind? #t)))
+    (create-partitions)
+    (try-insert)))
 
 (define (handle-populating-blocked-builds-for-scheduled-builds conn build-ids)
   (define (get-build-details build-id)