diff options
| author | Adelyn Breelove <[email protected]> | 2018-12-17 15:04:02 -0700 |
|---|---|---|
| committer | Adelyn Breelove <[email protected]> | 2018-12-17 15:04:02 -0700 |
| commit | 10ff247b7643fb0bb3aade5faff37c569feb0a20 (patch) | |
| tree | 662767c51baf3c39591ee7fecbc36d6642a93243 /lib/models/guild.ml | |
| parent | Some abstractions (diff) | |
| download | disml-10ff247b7643fb0bb3aade5faff37c569feb0a20.tar.xz disml-10ff247b7643fb0bb3aade5faff37c569feb0a20.zip | |
More stuff
Diffstat (limited to 'lib/models/guild.ml')
| -rw-r--r-- | lib/models/guild.ml | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/models/guild.ml b/lib/models/guild.ml index ade67be..7364327 100644 --- a/lib/models/guild.ml +++ b/lib/models/guild.ml @@ -62,7 +62,11 @@ module Make(Http : S.Http) = struct m |> Yojson.Safe.to_string |> Member_j.t_of_string let get_prune_count ~days guild = Http.guild_prune_count guild.id days - let get_role ~id guild = List.find ~f:(fun r -> r.id = id) guild.roles + + let get_role ~id guild = + let role = List.find ~f:(fun r -> r.id = id) guild.roles in + Option.(role >>| fun role -> Role.wrap { role; id=guild.id; }) + let get_webhooks guild = Http.get_guild_webhooks guild.id let kick_user ~id ?reason guild = |