diff options
| author | Christopher Baines <mail@cbaines.net> | 2024-06-08 11:18:49 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2024-06-08 11:18:49 +0100 |
| commit | 34a9eaa2015a7d350e1d2d232c0cb127881844d7 (patch) | |
| tree | 0c13859bc4f3f5a2fff0b07a241c51fa0a94abaf /guix-qa-frontpage | |
| parent | df9dc9e8ce6daad61b6854a1bc467efa1328675e (diff) | |
| download | qa-frontpage-34a9eaa2015a7d350e1d2d232c0cb127881844d7.tar qa-frontpage-34a9eaa2015a7d350e1d2d232c0cb127881844d7.tar.gz | |
Move starting all threads to start-guix-qa-frontpage
Diffstat (limited to 'guix-qa-frontpage')
| -rw-r--r-- | guix-qa-frontpage/server.scm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/guix-qa-frontpage/server.scm b/guix-qa-frontpage/server.scm index fe3ab71..9fa3d52 100644 --- a/guix-qa-frontpage/server.scm +++ b/guix-qa-frontpage/server.scm @@ -824,6 +824,7 @@ has no patches or has been closed.") database metrics-registry #:key (controller-args '()) submit-builds? + manage-patch-branches? patch-issues-to-show generate-reproducible.json) (define controller @@ -835,6 +836,11 @@ has no patches or has been closed.") (%patchwork-series-default-count patch-issues-to-show) + (when manage-patch-branches? + (start-manage-patch-branches-thread database + metrics-registry + #:series-count patch-issues-to-show)) + (let ((finished? (make-condition))) (call-with-new-thread (lambda () |