diff options
| author | Christopher Baines <mail@cbaines.net> | 2023-10-10 17:55:01 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2023-10-10 17:55:01 +0100 |
| commit | 2d3c5d497d36c26416beea3245f47c7c607b9558 (patch) | |
| tree | 80c375fca98a9de440974bdddb6543355e5d92c4 /scripts | |
| parent | c36609055d7331ae7995ccea202717f48be30403 (diff) | |
| download | qa-frontpage-2d3c5d497d36c26416beea3245f47c7c607b9558.tar qa-frontpage-2d3c5d497d36c26416beea3245f47c7c607b9558.tar.gz | |
Fix issues with submit-issue-builds
Diffstat (limited to 'scripts')
| -rw-r--r-- | scripts/guix-qa-frontpage.in | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/scripts/guix-qa-frontpage.in b/scripts/guix-qa-frontpage.in index 2fe36bf..66ae1b0 100644 --- a/scripts/guix-qa-frontpage.in +++ b/scripts/guix-qa-frontpage.in @@ -162,8 +162,6 @@ %submit-build-options %submit-build-default-options rest)) - (issue-number - (string->number issue-number-str)) (metrics-registry (make-metrics-registry #:namespace "guixqafrontpage")) @@ -175,10 +173,10 @@ database "http://127.0.0.1:8746" "https://data.qa.guix.gnu.org" - issue-number + issue-number-str #:priority (or (assq-ref opts 'priority) - (lambda (priority-for-change change) + (lambda (change) (if (member (assoc-ref change "system") '("x86_64-linux" "aarch64-linux")) 550 |