aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-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)