diff options
| author | Christopher Baines <mail@cbaines.net> | 2025-02-06 13:46:27 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2025-02-06 13:46:27 +0000 |
| commit | fb8a659544ba4b20b11ee30db9a4b23a3e3676ab (patch) | |
| tree | 047d091f56f5409bdd89019ad4603bd69e8a318d /guix-qa-frontpage | |
| parent | 9f953f3d3d69f5f6efdbcd82cabc9b7bc93e210f (diff) | |
| download | qa-frontpage-fb8a659544ba4b20b11ee30db9a4b23a3e3676ab.tar qa-frontpage-fb8a659544ba4b20b11ee30db9a4b23a3e3676ab.tar.gz | |
Use the data service for the list of branches
As it's custom configuration to limit the branches is causing issues
here, patches are being applied on top of a branch when the data
serivce doesn't have data for that branch, causing it to be re-created
over and over again.
Diffstat (limited to 'guix-qa-frontpage')
| -rw-r--r-- | guix-qa-frontpage/manage-patch-branches.scm | 11 |
1 files changed, 4 insertions, 7 deletions
diff --git a/guix-qa-frontpage/manage-patch-branches.scm b/guix-qa-frontpage/manage-patch-branches.scm index b92e8a8..83b9579 100644 --- a/guix-qa-frontpage/manage-patch-branches.scm +++ b/guix-qa-frontpage/manage-patch-branches.scm @@ -329,13 +329,10 @@ (memoize get-latest-processed-branch-revision)) (branches (cons "master" - (filter-map - (match-lambda - ((name . details) - (if (assoc-ref details "issue_number") - name - #f))) - (list-non-master-branches))))) + (map (lambda (branch) + (assoc-ref branch "name")) + (list-branches + (list-branches-url %data-service-guix-repository-id)))))) ;; Several series can use the same base revision, so memoize looking up ;; the changes compared to master |