1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
-- | The loving comments people have left on Gists, described on
-- <http://developer.github.com/v3/gists/comments/>.
module Github.Gists.Comments (
commentsOn
,comment
,module Github.Data
) where
import Github.Data
import Github.Private
-- | All the comments on a Gist, given the Gist ID.
--
-- > commentsOn "1174060"
commentsOn :: String -> IO (Either Error [GistComment])
commentsOn gistId = githubGet ["gists", gistId, "comments"]
-- | A specific comment, by the comment ID.
--
-- > comment "62449"
comment :: String -> IO (Either Error GistComment)
comment commentId = githubGet ["gists", "comments", commentId]
|
