[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[PATCH] web: Include merged_with in graphql <issue>.
From: |
Christopher Baines |
Subject: |
[PATCH] web: Include merged_with in graphql <issue>. |
Date: |
Tue, 26 Sep 2023 09:59:25 +0100 |
* mumi/web/graphql.scm (<issue>): Include merged_with.
---
mumi/web/graphql.scm | 12 +++++++++++-
1 file changed, 11 insertions(+), 1 deletion(-)
diff --git a/mumi/web/graphql.scm b/mumi/web/graphql.scm
index 6dcb8ce..2c7c676 100644
--- a/mumi/web/graphql.scm
+++ b/mumi/web/graphql.scm
@@ -69,7 +69,17 @@
(issue-messages (bug-num parent))))
(blocked_by (non-nullable-type (list-type <issue>))
(lambda (parent . _)
- (map bug-status (bug-blockedby parent)))))
+ (map bug-status (bug-blockedby parent))))
+ (merged_with (non-nullable-type (list-type <issue>))
+ (lambda (parent . _)
+ (map
+ bug-status
+ (match (bug-mergedwith parent)
+ ((? string? str)
+ (string-split str #\space))
+ ((? number? n)
+ (list (number->string n)))
+ (#f '()))))))
(define-object-type <person>
(name <string> (lambda (parent . _)
--
2.41.0
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [PATCH] web: Include merged_with in graphql <issue>.,
Christopher Baines <=