shrub/mar/gh/issue-comment.hoon

43 lines
1.0 KiB
Plaintext
Raw Normal View History

2016-01-28 00:50:06 +03:00
:: Converts the result of an 'issues' event into a issues:gh.
2016-01-26 04:13:08 +03:00
/- gh
2016-03-25 01:42:39 +03:00
/+ gh-parse, talk
|_ issue-comment/issue-comment:gh
2016-03-25 01:42:39 +03:00
++ grow
|%
++ talk-speeches
^- (list speech:talk)
:_ ~
2016-03-26 03:47:22 +03:00
=+ ^= txt
2016-03-25 02:55:10 +03:00
;: (cury cat 3)
'on issue #'
`@t`(rsh 3 2 (scot %ui number.issue.issue-comment))
': '
body.comment.issue-comment
==
2016-03-26 03:47:22 +03:00
:* %api %github
login.sender.issue-comment
(rash html-url.sender.issue-comment aurf:urlp)
2016-03-26 03:47:22 +03:00
txt
txt
(rash html-url.comment.issue-comment aurf:urlp)
2016-03-26 03:47:22 +03:00
%- jobe :~
repository+s+name.repository.issue-comment
number+(jone number.issue.issue-comment)
title+s+title.issue.issue-comment
==
2016-03-25 01:42:39 +03:00
==
--
2016-01-26 04:13:08 +03:00
++ grab
|%
++ json
2016-04-01 01:15:07 +03:00
=; jop |=(jon/^json `issue-comment:gh`(need (jop jon)))
%- ot:jo
:~ repository+repository:gh-parse
sender+user:gh-parse
action+so:jo
issue+issue:gh-parse
comment+comment:gh-parse
2016-01-26 04:13:08 +03:00
==
--
--