diff options
| author | Christopher Baines <mail@cbaines.net> | 2024-05-15 13:18:30 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2024-05-17 14:39:38 +0100 |
| commit | 869a73974dbdadd012bc0277139937c298a5bd45 (patch) | |
| tree | fcf48a98ba6dcd72e56ea650787c143abd890182 /guix-qa-frontpage/manage-builds.scm | |
| parent | a2830cbbf86660db64e8a409a6a9d12842ae13f9 (diff) | |
| download | qa-frontpage-869a73974dbdadd012bc0277139937c298a5bd45.tar qa-frontpage-869a73974dbdadd012bc0277139937c298a5bd45.tar.gz | |
Avoid issue with accessing the Git repo from fibers
Diffstat (limited to 'guix-qa-frontpage/manage-builds.scm')
| -rw-r--r-- | guix-qa-frontpage/manage-builds.scm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/guix-qa-frontpage/manage-builds.scm b/guix-qa-frontpage/manage-builds.scm index 7ef461d..ea9adc3 100644 --- a/guix-qa-frontpage/manage-builds.scm +++ b/guix-qa-frontpage/manage-builds.scm @@ -255,9 +255,11 @@ (get-commit (string-append "origin/" branch))) (merge-base - (get-git-merge-base - (get-commit "origin/master") - branch-commit)) + (non-blocking + (lambda () + (get-git-merge-base + (get-commit "origin/master") + branch-commit)))) (revisions `((base . ,merge-base) |