aboutsummaryrefslogtreecommitdiff
path: root/guix-qa-frontpage/view/issue.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix-qa-frontpage/view/issue.scm')
-rw-r--r--guix-qa-frontpage/view/issue.scm11
1 files changed, 0 insertions, 11 deletions
diff --git a/guix-qa-frontpage/view/issue.scm b/guix-qa-frontpage/view/issue.scm
index d3badff..2634aec 100644
--- a/guix-qa-frontpage/view/issue.scm
+++ b/guix-qa-frontpage/view/issue.scm
@@ -89,17 +89,6 @@
'()
builds))
- (define (filter-package-builds-by-status builds-by-package statuses)
- (filter
- (match-lambda
- ((package . builds)
- (find
- (lambda (build)
- (member (assoc-ref build "status")
- statuses))
- builds)))
- builds-by-package))
-
(define systems
(map car builds-by-system))