-- |
module Strive.Actions.Comments
( getActivityComments,
)
where
import Network.HTTP.Types (toQuery)
import Strive.Aliases (ActivityId, Result)
import Strive.Client (Client)
import Strive.Internal.HTTP (get)
import Strive.Options (GetActivityCommentsOptions)
import Strive.Types (CommentSummary)
-- |
getActivityComments ::
Client ->
ActivityId ->
GetActivityCommentsOptions ->
IO (Result [CommentSummary])
getActivityComments client activityId options = get client resource query
where
resource = "api/v3/activities/" <> show activityId <> "/comments"
query = toQuery options