Christopher Baines <mail@cbaines.net> writes:

> * mumi/web/graphql.scm (<issue>): Include blocked-by.
> ---
>  mumi/web/graphql.scm | 5 ++++-
>  1 file changed, 4 insertions(+), 1 deletion(-)
>
> diff --git a/mumi/web/graphql.scm b/mumi/web/graphql.scm
> index aa4f38c..3cc19cd 100644
> --- a/mumi/web/graphql.scm
> +++ b/mumi/web/graphql.scm
> @@ -63,7 +63,10 @@
>                (list))))
>    (messages (non-nullable-type (list-type <email>))
>              (lambda (parent . _)
> -              (issue-messages (bug-num parent)))))
> +              (issue-messages (bug-num parent))))
> +  (blocked-by (non-nullable-type (list-type <issue>))
> +              (lambda (parent . _)
> +                (map bug-status (bug-blockedby parent)))))
>  
>  (define-object-type <person>
>    (name <string> (lambda (parent . _)

I'm looking at this so that the qa-frontpage can see what issues are
blocked.

I'm not sure how to test this though.