diff options
-rw-r--r-- | scripts/guix-qa-frontpage.in | 4 |
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) |