aboutsummaryrefslogtreecommitdiff
path: root/scripts
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2023-05-30 10:27:45 +0100
committerChristopher Baines <mail@cbaines.net>2023-05-30 10:27:45 +0100
commit6f84d5bb05688d232d78145465ddd6de3c7f5c6c (patch)
tree19552a8c22db2e4f583b39b044dd8f759211de0a /scripts
parentb70298cdeffb1da0ab80496527e68962bc4928e4 (diff)
downloadqa-frontpage-6f84d5bb05688d232d78145465ddd6de3c7f5c6c.tar
qa-frontpage-6f84d5bb05688d232d78145465ddd6de3c7f5c6c.tar.gz
Fix incorrect priority handling in the guix-qa-frontpage script
Diffstat (limited to 'scripts')
-rw-r--r--scripts/guix-qa-frontpage.in4
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/guix-qa-frontpage.in b/scripts/guix-qa-frontpage.in
index 438a6b1..72d8dd6 100644
--- a/scripts/guix-qa-frontpage.in
+++ b/scripts/guix-qa-frontpage.in
@@ -161,7 +161,7 @@
"https://data.qa.guix.gnu.org"
issue-number
#:priority
- (or (const (assq-ref opts 'priority))
+ (or (assq-ref opts 'priority)
(lambda (priority-for-change change)
(if (member (assoc-ref change "system")
'("x86_64-linux" "aarch64-linux"))
@@ -188,7 +188,7 @@
"https://data.qa.guix.gnu.org"
branch-name
#:priority
- (or (const (assq-ref opts 'priority))
+ (or (assq-ref opts 'priority)
default-branch-priority-for-change)
#:systems
(or (assq-ref opts 'systems)