diff options
| -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 |