diff options
| author | Adelyn Breedlove <[email protected]> | 2019-02-12 19:49:33 +0000 |
|---|---|---|
| committer | Adelyn Breedlove <[email protected]> | 2019-02-12 19:49:33 +0000 |
| commit | b245933103d84a4320a9b21f0faaf84a11a2886b (patch) | |
| tree | b5ff6275e4053971d4f0d524cf39bd1310af4e67 /lib/models/guild | |
| parent | Random useless command in the test bot (diff) | |
| download | disml-b245933103d84a4320a9b21f0faaf84a11a2886b.tar.xz disml-b245933103d84a4320a9b21f0faaf84a11a2886b.zip | |
Fix opam dependencies and revert changes
Diffstat (limited to 'lib/models/guild')
| -rw-r--r-- | lib/models/guild/guild.mli | 8 | ||||
| -rw-r--r-- | lib/models/guild/member.ml | 1 | ||||
| -rw-r--r-- | lib/models/guild/role.ml | 1 |
3 files changed, 6 insertions, 4 deletions
diff --git a/lib/models/guild/guild.mli b/lib/models/guild/guild.mli index 1fbcf55..6840828 100644 --- a/lib/models/guild/guild.mli +++ b/lib/models/guild/guild.mli @@ -3,7 +3,7 @@ open Async include module type of Guild_t
val ban_user : id:Snowflake.t -> ?reason:string -> ?days:int -> t -> unit Deferred.Or_error.t
-val create : (string * Yojson.Safe.t) list -> t Deferred.Or_error.t
+val create : (string * Yojson.Safe.json) list -> t Deferred.Or_error.t
val create_emoji : name:string -> image:string -> t -> Emoji.t Deferred.Or_error.t
val create_role :
name:string ->
@@ -18,12 +18,12 @@ val delete : t -> unit Deferred.Or_error.t val get_ban : id:Snowflake.t -> t -> Ban_t.t Deferred.Or_error.t
val get_bans : t -> Ban_t.t list Deferred.Or_error.t
val get_emoji : id:Snowflake.t -> t -> Emoji.t Deferred.Or_error.t
-val get_invites : t -> Yojson.Safe.t Deferred.Or_error.t
+val get_invites : t -> Yojson.Safe.json Deferred.Or_error.t
val get_prune_count : days:int -> t -> int Deferred.Or_error.t
-val get_webhooks : t -> Yojson.Safe.t Deferred.Or_error.t
+val get_webhooks : t -> Yojson.Safe.json Deferred.Or_error.t
val kick_user : id:Snowflake.t -> ?reason:string -> t -> unit Deferred.Or_error.t
val leave : t -> unit Deferred.Or_error.t
-val list_voice_regions : t -> Yojson.Safe.t Deferred.Or_error.t
+val list_voice_regions : t -> Yojson.Safe.json Deferred.Or_error.t
val prune : days:int -> t -> int Deferred.Or_error.t
val request_members : t -> Member_t.t list Deferred.Or_error.t
val set_afk_channel : id:Snowflake.t -> t -> Guild_t.t Deferred.Or_error.t
diff --git a/lib/models/guild/member.ml b/lib/models/guild/member.ml index c5a7455..1215396 100644 --- a/lib/models/guild/member.ml +++ b/lib/models/guild/member.ml @@ -1,3 +1,4 @@ +open Core
include Member_t
let add_role ~(role:Role_t.t) member =
diff --git a/lib/models/guild/role.ml b/lib/models/guild/role.ml index 55e5813..1063d44 100644 --- a/lib/models/guild/role.ml +++ b/lib/models/guild/role.ml @@ -1,3 +1,4 @@ +open Core
include Role_t
let edit_role ~body (role:t) =
|