diff options
Diffstat (limited to 'guix-qa-frontpage/mumi.scm')
| -rw-r--r-- | guix-qa-frontpage/mumi.scm | 10 |
1 files changed, 1 insertions, 9 deletions
diff --git a/guix-qa-frontpage/mumi.scm b/guix-qa-frontpage/mumi.scm index ce6a435..8298e3d 100644 --- a/guix-qa-frontpage/mumi.scm +++ b/guix-qa-frontpage/mumi.scm @@ -29,8 +29,6 @@ #:select (retry-on-error)) #:export (mumi-search-issues - mumi-issue-blocking-info - mumi-issue-open? mumi-bulk-issues)) @@ -72,17 +70,11 @@ (lambda () (let ((response (graphql-http-get "https://issues.guix.gnu.org/graphql" - `(document (query (#(issues #:search ,query) number title date open)))))) + `(document (query (#(issues #:search ,query) number title date open (blocked_by number))))))) (assoc-ref response "issues"))) #:unwind? #t)) -(define (mumi-issue-blocking-info number) - (let ((response - (graphql-http-get "https://issues.guix.gnu.org/graphql" - `(document (query (#(issue #:number ,number) blockedby blocks)))))) - (cdr (first response)))) - (define (mumi-issue-open? number) (let ((response (graphql-http-get "https://issues.guix.gnu.org/graphql" |